changeset 75302:45c72f1f789d

(last-sexp-toggle-display): Fixed cursor position when toggle abbreviated display.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 20 Jan 2007 15:42:57 +0000
parents 2e356462f90e
children 528bac1f7b32
files lisp/emacs-lisp/lisp-mode.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el	Sat Jan 20 15:33:34 2007 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Sat Jan 20 15:42:57 2007 +0000
@@ -490,6 +490,8 @@
 	      (point (point)))
 	  (delete-region beg end)
 	  (insert (nth 1 value))
+	  (or (= beg point)
+	      (setq point (1- (point))))
 	  (last-sexp-setup-props beg (point)
 				 (nth 0 value)
 				 (nth 2 value)