summaryrefslogtreecommitdiff
path: root/lisp/leim/quail/lao.el
diff options
context:
space:
mode:
authorDavid Kastrup <dak@gnu.org>2015-07-25 18:54:42 +0200
committerDavid Kastrup <dak@gnu.org>2015-08-04 14:34:15 +0200
commit5022e27dac4c13651941e425dbec5b3a2cecdae4 (patch)
tree696d748c8abc3aea1bfd5305a8e71dc985053496 /lisp/leim/quail/lao.el
parent227e996946d4629fa8f6d665564a37668290c87f (diff)
downloademacs-5022e27dac4c13651941e425dbec5b3a2cecdae4.tar.gz
; Do not overwrite preexisting contents of unread-command-events
Diffstat (limited to 'lisp/leim/quail/lao.el')
-rw-r--r--lisp/leim/quail/lao.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/leim/quail/lao.el b/lisp/leim/quail/lao.el
index 52357afd8dd..14cf9268287 100644
--- a/lisp/leim/quail/lao.el
+++ b/lisp/leim/quail/lao.el
@@ -36,8 +36,9 @@
(buffer-substring (overlay-start quail-overlay)
(overlay-end quail-overlay))
unread-command-events
- (string-to-list
- (substring quail-current-key control-flag)))
+ (append
+ (substring quail-current-key control-flag)
+ unread-command-events))
(setq quail-current-str
(compose-string (quail-lookup-map-and-concat quail-current-key))))
control-flag)