diff options
author | Richard M. Stallman <rms@gnu.org> | 2003-04-14 10:09:35 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2003-04-14 10:09:35 +0000 |
commit | 1d24f6185810900396ed8e98e70f68cdb66af5e9 (patch) | |
tree | d74054e81aef1a5468846fa249255c5edceb6984 /lisp/emacs-lisp | |
parent | 872a0a6ff33db07994a8e89c5423875cf672a98f (diff) | |
download | emacs-1d24f6185810900396ed8e98e70f68cdb66af5e9.tar.gz emacs-1d24f6185810900396ed8e98e70f68cdb66af5e9.tar.bz2 emacs-1d24f6185810900396ed8e98e70f68cdb66af5e9.zip |
(last-sexp-toggle-display): At end of buffer, run the global binding
of the same key.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 6c084c409df..fe38ab5a804 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -426,7 +426,8 @@ alternative printed representations that can be displayed." ;; But when the end of the line is also the end of the buffer, ;; it does get called. For consistency, pretend it was not called. (if (eobp) - (newline arg) + (let ((prefix-arg arg)) + (command-execute (lookup-key global-map (this-single-command-keys)))) (let ((value (get-text-property (point) 'printed-value))) (when value (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point))) |