/[emacs]/emacs/lisp/emacs-lisp/lisp-mode.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/lisp-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.145 by monnier, Tue May 27 14:17:17 2003 UTC revision 1.146 by rms, Wed May 28 11:27:52 2003 UTC
# Line 428  alternative printed representations that Line 428  alternative printed representations that
428    ;; Normally this command won't be called at end of line.    ;; 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,    ;; 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.    ;; it does get called.  For consistency, pretend it was not called.
431    (if (eobp)    (save-restriction
432        (let ((prefix-arg arg))      (widen)
         (command-execute (lookup-key global-map (this-single-command-keys))))  
433      (let ((value (get-text-property (point) 'printed-value)))      (let ((value (get-text-property (point) 'printed-value)))
434        (when value        (when value
435          (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point)))          (let ((beg (or (previous-single-property-change (min (point-max) (1+ (point)))

Legend:
Removed from v.1.145  
changed lines
  Added in v.1.146

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26