From 9495add8c6b3d6dc29cab3b3750b788ad9f045d9 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 8 Jul 2005 00:52:05 +0000 Subject: (quail-japanese-kanji-kkc): Fix order of insertion and deletion. --- leim/quail/japanese.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'leim/quail') diff --git a/leim/quail/japanese.el b/leim/quail/japanese.el index fa87a9935b..09b005a7bb 100644 --- a/leim/quail/japanese.el +++ b/leim/quail/japanese.el @@ -79,9 +79,9 @@ (when (= (char-before (overlay-end quail-conv-overlay)) ?n) ;; The last char is `n'. We had better convert it to `ん' ;; before kana-kanji conversion. - (goto-char (overlay-end quail-conv-overlay)) - (delete-char -1) - (insert ?ん)) + (goto-char (1- (overlay-end quail-conv-overlay))) + (insert ?ん) + (delete-char 1)) (let* ((from (copy-marker (overlay-start quail-conv-overlay))) (len (- (overlay-end quail-conv-overlay) from))) (quail-delete-overlays) -- cgit v1.2.3