diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c71ac75f2fc..b69c0e43a20 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-01-20 Alin C. Soare (tiny change) + + * lisp/emacs-lisp/lisp-mode.el (last-sexp-toggle-display): Fixed + cursor position when toggle abbreviated display. + 2007-01-20 Nick Roberts * t-mouse.el: Update copyright following assignment by diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index a58ecb256ac..3a501ea85c1 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -490,6 +490,8 @@ alternative printed representations that can be displayed." (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)