aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/international/quail.el9
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 98176f3d84b..87b0ce350d4 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1071,14 +1071,7 @@ The returned value is a Quail map specific to KEY."
1071 (if input-method-exit-on-first-char 1071 (if input-method-exit-on-first-char
1072 (setq control-flag t)) 1072 (setq control-flag t))
1073 (setq quail-current-str 1073 (setq quail-current-str
1074 (substring quail-current-key 0 len))) 1074 (substring quail-current-key 0 len)))))
1075 (or enable-multibyte-characters
1076 (progn
1077 (if (not (stringp quail-current-str))
1078 (setq quail-current-str
1079 (char-to-string quail-current-str)))
1080 (setq quail-current-str
1081 (string-as-unibyte quail-current-str))))))
1082 (if quail-current-str 1075 (if quail-current-str
1083 (if input-method-exit-on-first-char 1076 (if input-method-exit-on-first-char
1084 (setq control-flag t)) 1077 (setq control-flag t))