diff --git a/anthy-use-last-command-event.diff b/anthy-use-last-command-event.diff
new file mode 100644
index 0000000..8e16df3
--- /dev/null
+++ b/anthy-use-last-command-event.diff
@@ -0,0 +1,15 @@
+---
+ src-util/anthy.el |    2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+--- a/src-util/anthy.el
++++ b/src-util/anthy.el
+@@ -892,7 +892,7 @@
+ 	 ((equal event (character-to-event 'backspace)) 8)
+ 	 (t
+ 	  (char-to-int (event-to-character event)))))
+-    last-command-char))
++    last-command-event))
+ 
+ ;;
+ ;;
diff --git a/anthy.changes b/anthy.changes
index 1cf7eed..35cc2c5 100644
--- a/anthy.changes
+++ b/anthy.changes
@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Wed Nov  6 15:32:43 CET 2013 - tiwai@suse.de
+
+- Fix breakage on GNU Emacs on openSUSE 13.1 (bnc#849211)
+
 -------------------------------------------------------------------
 Fri Jul 12 12:39:02 CEST 2013 - tiwai@suse.de
 
diff --git a/anthy.spec b/anthy.spec
index de4fdb5..46a2340 100644
--- a/anthy.spec
+++ b/anthy.spec
@@ -45,6 +45,8 @@ Source1:        suse-start-anthy.el
 Source2:        baselibs.conf
 Patch2:         anthy-last-command-char-xemacs.patch
 Patch3:         bugzilla-224463-comparison-with-string-literal.patch
+# PATCH-FIX-OPENSUSE anthy-use-last-command-event.diff bnc#849211 tiwai@suse.de
+Patch4:         anthy-use-last-command-event.diff
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 Summary:        Kana-Kanji Conversion Engine
 License:        GPL-2.0+ and LGPL-2.1+
@@ -88,6 +90,9 @@ to develop applications that require these.
 %setup -q
 %patch2 -p 1
 %patch3 -p 1
+%if 0%{?suse_version} > 1230
+%patch4 -p 1
+%endif
 
 %build
 autoreconf --force --install