From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 28 May 2003 11:27:52 +0000 (+0000)
Subject: (last-sexp-toggle-display):
X-Git-Tag: ttn-vms-21-2-B4~9894
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3b8d36f152d4d290a14074e8c08bf89c646b0a1a;p=emacs.git

(last-sexp-toggle-display):
Undo previous change (don't check for eob).  Widen at the beginning.
---

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."
   ;; Normally this command won't be called at end of line.
   ;; 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)
-      (let ((prefix-arg arg))
-	(command-execute (lookup-key global-map (this-single-command-keys))))
+  (save-restriction
+    (widen)
     (let ((value (get-text-property (point) 'printed-value)))
       (when value
 	(let ((beg (or (previous-single-property-change (min (point-max) (1+ (point)))