diff options
author | Kenichi Handa <handa@m17n.org> | 2005-07-08 00:52:05 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 2005-07-08 00:52:05 +0000 |
commit | 8599813ee08166298aefd31188691631bc5e9f31 (patch) | |
tree | e413ab18cb250871152bc5fbc835f6d1ed756e76 /leim | |
parent | 94007bbdd8b65853beb39d3afdb74539aa63e33f (diff) | |
download | emacs-8599813ee08166298aefd31188691631bc5e9f31.tar.gz |
(quail-japanese-kanji-kkc): Fix order of
insertion and deletion.
Diffstat (limited to 'leim')
-rw-r--r-- | leim/quail/japanese.el | 6 |
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) |