(last-sexp-toggle-display): At end of buffer, run the global binding

of the same key.
This commit is contained in:
Richard M. Stallman 2003-04-14 10:09:35 +00:00
parent 872a0a6ff3
commit 1d24f61858

View file

@ -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)))