; Do not overwrite preexisting contents of unread-command-events

[gnu-emacs] / lisp / international / robin.el

diff --git a/lisp/international/robin.el b/lisp/international/robin.el
index 8254180fcc1832240e81ab1ac523659b66aa09a6..0ef90b18932d247894887877c2696916f0a7e3ef 100644 (file)
--- a/lisp/international/robin.el
+++ b/lisp/international/robin.el
@@ -466,7 +466,7 @@ While this input method is active, the variable
          (list key)
        (delete-region start (point))
        (if key
-           (setq unread-command-events (list key)))
+           (push key unread-command-events))
        (if (stringp output)
            (string-to-list output)
          (list output))))))