From 73f30cdb0ac87ee0540072b70ff16cf627b2708f Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 14 Jan 1999 01:20:35 +0000 Subject: [PATCH] (quail-japanese-kanji-kkc): If the last char to convert is `n', change it to Japanese Hiragana `n' before conversion. --- leim/quail/japanese.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/leim/quail/japanese.el b/leim/quail/japanese.el index 4451ba31c4c..6a6036a3c90 100644 --- a/leim/quail/japanese.el +++ b/leim/quail/japanese.el @@ -80,9 +80,15 @@ (defun quail-japanese-kanji-kkc () (interactive) (let ((from (overlay-start quail-conv-overlay)) - (to (overlay-end quail-conv-overlay)) - newfrom) + (to (overlay-end quail-conv-overlay))) (quail-delete-overlays) + (setq quail-current-str nil) + (when (= (char-before to) ?n) + ;; The last char is `n'. We had better convert it to `ん' + ;; before kana-kanji conversion. + (goto-char to) + (delete-char -1) + (insert ?ん)) (let ((result (kkc-region from to))) (move-overlay quail-conv-overlay from (point)) (setq quail-conversion-str (buffer-substring from (point))) -- 2.39.2