summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2007-01-20 15:43:48 +0000
committerEli Zaretskii <eliz@gnu.org>2007-01-20 15:43:48 +0000
commitf56cd1335ce17bd2e871ca33e4d6d4c37cd949ff (patch)
tree24aabf89161b3c3d6e823ff6a130a9bc8936484e
parent2d5ed88d3102acb7f290571900d5a6fc3cad824b (diff)
downloademacs-f56cd1335ce17bd2e871ca33e4d6d4c37cd949ff.tar.gz
(last-sexp-toggle-display): Fixed cursor position when toggle abbreviated
display.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/emacs-lisp/lisp-mode.el2
2 files changed, 7 insertions, 0 deletions
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 <alinsoar@voila.fr> (tiny change)
+
+ * lisp/emacs-lisp/lisp-mode.el (last-sexp-toggle-display): Fixed
+ cursor position when toggle abbreviated display.
+
2007-01-20 Nick Roberts <nickrob@snap.net.nz>
* 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)