Commit f370eb4c authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(kkc-region): Handled the case that

conversion is cancelled.
(kkc-terminate): Update kkc-overlay-head correctly.
(kkc-cancel): Don't call kkc-terminate, but set kkc-converting to
nil.
parent 348d1438
......@@ -232,17 +232,19 @@ and the return value is the length of the conversion."
;; Let's put the event back.
(setq unread-input-method-events
(append (string-to-list keyseq) unread-input-method-events))
(setq kkc-converting nil)))))
(kkc-terminate)))))
(force-mode-line-update)
(goto-char (overlay-end kkc-overlay-tail))
(prog1 (- (point) from)
(prog1 (- (overlay-start kkc-overlay-head) from)
(delete-overlay kkc-overlay-head)
(delete-overlay kkc-overlay-tail)))
(defun kkc-terminate ()
"Exit from KKC mode by fixing the current conversion."
(interactive)
(goto-char (overlay-end kkc-overlay-tail))
(move-overlay kkc-overlay-head (point) (point))
(setq kkc-converting nil))
(defun kkc-cancel ()
......@@ -252,7 +254,7 @@ and the return value is the length of the conversion."
(delete-region (overlay-start kkc-overlay-head)
(overlay-end kkc-overlay-tail))
(insert kkc-original-kana)
(kkc-terminate))
(setq kkc-converting nil))
(defun kkc-first-char-only ()
"Select only the first character currently converted."
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment