Fix: point moves after completion

This commit is contained in:
Takafumi Arakaki 2012-05-13 17:06:14 +02:00
parent 821ef3009d
commit 4a1261fc5e

View file

@ -332,7 +332,8 @@ A specific node can be specified using optional ARGS."
(defun ein:cell-finish-completing (cell matched-text matches)
(let* ((end (point))
(beg (re-search-backward (concat matched-text "\\=")))
(beg (save-excursion
(re-search-backward (concat matched-text "\\="))))
(word (if (and beg matches)
(completing-read "Complete: " matches))))
(when word