summaryrefslogtreecommitdiff
path: root/leim
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2005-07-08 00:52:05 +0000
committerKenichi Handa <handa@m17n.org>2005-07-08 00:52:05 +0000
commit8599813ee08166298aefd31188691631bc5e9f31 (patch)
treee413ab18cb250871152bc5fbc835f6d1ed756e76 /leim
parent94007bbdd8b65853beb39d3afdb74539aa63e33f (diff)
downloademacs-8599813ee08166298aefd31188691631bc5e9f31.tar.gz
(quail-japanese-kanji-kkc): Fix order of
insertion and deletion.
Diffstat (limited to 'leim')
-rw-r--r--leim/quail/japanese.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/leim/quail/japanese.el b/leim/quail/japanese.el
index fa87a9935b9..09b005a7bb2 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)