Commit fd7a117d authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(quail-update-translation): Don't insert

such an unsupported multibyte char in a unibyte buffer.
parent 4ce2719d
......@@ -1524,6 +1524,28 @@ with more keys."
(let (pos)
(quail-delete-region)
(setq pos (point))
(or enable-multibyte-characters
(let (char)
(if (stringp quail-current-str)
(catch 'tag
(mapc #'(lambda (ch)
(when (/= (unibyte-char-to-multibyte
(multibyte-char-to-unibyte ch))
ch)
(setq char ch)
(throw 'tag nil)))
quail-current-str))
(if (/= (unibyte-char-to-multibyte
(multibyte-char-to-unibyte quail-current-str))
quail-current-str)
(setq char quail-current-str)))
(when char
(message "Can't input %c in the current unibyte buffer" char)
(ding)
(sit-for 2)
(message nil)
(setq quail-current-str nil)
(throw 'quail-tag nil))))
(insert quail-current-str)
(move-overlay quail-overlay pos (point))
(if (overlayp quail-conv-overlay)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment