aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2003-05-28 11:27:52 +0000
committerRichard M. Stallman2003-05-28 11:27:52 +0000
commit3b8d36f152d4d290a14074e8c08bf89c646b0a1a (patch)
tree5f7229da660260d9c95d72f1dd940748d5bad608
parent3c9dc1cf0d6be64608cd309ad042d74e4fc02049 (diff)
downloademacs-3b8d36f152d4d290a14074e8c08bf89c646b0a1a.tar.gz
emacs-3b8d36f152d4d290a14074e8c08bf89c646b0a1a.zip
(last-sexp-toggle-display):
Undo previous change (don't check for eob). Widen at the beginning.
-rw-r--r--lisp/emacs-lisp/lisp-mode.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 692f00b7817..b922f4e8072 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -428,9 +428,8 @@ alternative printed representations that can be displayed."
428 ;; Normally this command won't be called at end of line. 428 ;; Normally this command won't be called at end of line.
429 ;; But when the end of the line is also the end of the buffer, 429 ;; But when the end of the line is also the end of the buffer,
430 ;; it does get called. For consistency, pretend it was not called. 430 ;; it does get called. For consistency, pretend it was not called.
431 (if (eobp) 431 (save-restriction
432 (let ((prefix-arg arg)) 432 (widen)
433 (command-execute (lookup-key global-map (this-single-command-keys))))
434 (let ((value (get-text-property (point) 'printed-value))) 433 (let ((value (get-text-property (point) 'printed-value)))
435 (when value 434 (when value
436 (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point))) 435 (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point)))