summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2007-01-20 15:42:57 +0000
committerEli Zaretskii <eliz@gnu.org>2007-01-20 15:42:57 +0000
commitc7c8f0418259f2a7ff7a8b32943f868cd798a021 (patch)
treeb96dfda5f3358351bd8eab9d99b855bf7f7313d6 /lisp/emacs-lisp
parent89846aa9716a3c6d3b253a70b0642a92b4339de7 (diff)
downloademacs-c7c8f0418259f2a7ff7a8b32943f868cd798a021.tar.gz
(last-sexp-toggle-display): Fixed cursor position when toggle abbreviated
display.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/lisp-mode.el2
1 files changed, 2 insertions, 0 deletions
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)