From: Richard M. Stallman Date: Mon, 14 Apr 2003 10:09:35 +0000 (+0000) Subject: (last-sexp-toggle-display): At end of buffer, run the global binding X-Git-Tag: ttn-vms-21-2-B4~10518 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1d24f6185810900396ed8e98e70f68cdb66af5e9;p=emacs.git (last-sexp-toggle-display): At end of buffer, run the global binding of the same key. --- 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)))