diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2007-01-20 15:43:48 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2007-01-20 15:43:48 +0000 |
| commit | f56cd1335ce17bd2e871ca33e4d6d4c37cd949ff (patch) | |
| tree | 24aabf89161b3c3d6e823ff6a130a9bc8936484e /lisp/emacs-lisp | |
| parent | 2d5ed88d3102acb7f290571900d5a6fc3cad824b (diff) | |
| download | emacs-f56cd1335ce17bd2e871ca33e4d6d4c37cd949ff.tar.gz emacs-f56cd1335ce17bd2e871ca33e4d6d4c37cd949ff.tar.bz2 emacs-f56cd1335ce17bd2e871ca33e4d6d4c37cd949ff.zip | |
(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.el | 2 |
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) |