Index: emacs/leim/quail/japanese.el
diff -c emacs/leim/quail/japanese.el:1.27 emacs/leim/quail/japanese.el:1.28
*** emacs/leim/quail/japanese.el:1.27 Mon Jul 4 15:27:32 2005
--- emacs/leim/quail/japanese.el Fri Jul 8 00:52:05 2005
***************
*** 79,87 ****
(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 ?ん))
(let* ((from (copy-marker (overlay-start quail-conv-overlay)))
(len (- (overlay-end quail-conv-overlay) from)))
(quail-delete-overlays)
--- 79,87 ----
(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 (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)
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
