426 |
;; 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, |
427 |
;; it does get called. For consistency, pretend it was not called. |
;; it does get called. For consistency, pretend it was not called. |
428 |
(if (eobp) |
(if (eobp) |
429 |
(newline arg) |
(let ((prefix-arg arg)) |
430 |
|
(command-execute (lookup-key global-map (this-single-command-keys)))) |
431 |
(let ((value (get-text-property (point) 'printed-value))) |
(let ((value (get-text-property (point) 'printed-value))) |
432 |
(when value |
(when value |
433 |
(let ((beg (or (previous-single-property-change (min (point-max) (1+ (point))) |
(let ((beg (or (previous-single-property-change (min (point-max) (1+ (point))) |