diff options
| author | Richard M. Stallman | 2003-04-14 10:09:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-04-14 10:09:35 +0000 |
| commit | 1d24f6185810900396ed8e98e70f68cdb66af5e9 (patch) | |
| tree | d74054e81aef1a5468846fa249255c5edceb6984 | |
| parent | 872a0a6ff33db07994a8e89c5423875cf672a98f (diff) | |
| download | emacs-1d24f6185810900396ed8e98e70f68cdb66af5e9.tar.gz emacs-1d24f6185810900396ed8e98e70f68cdb66af5e9.zip | |
(last-sexp-toggle-display): At end of buffer, run the global binding
of the same key.
| -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." | |||
| 426 | ;; But when the end of the line is also the end of the buffer, | 426 | ;; But when the end of the line is also the end of the buffer, |
| 427 | ;; it does get called. For consistency, pretend it was not called. | 427 | ;; it does get called. For consistency, pretend it was not called. |
| 428 | (if (eobp) | 428 | (if (eobp) |
| 429 | (newline arg) | 429 | (let ((prefix-arg arg)) |
| 430 | (command-execute (lookup-key global-map (this-single-command-keys)))) | ||
| 430 | (let ((value (get-text-property (point) 'printed-value))) | 431 | (let ((value (get-text-property (point) 'printed-value))) |
| 431 | (when value | 432 | (when value |
| 432 | (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point))) | 433 | (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point))) |