diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/simple.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8601fb78b75..f844f3f8f32 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2012-03-22 Chong Yidong <cyd@gnu.org> | ||
| 2 | |||
| 3 | * simple.el (end-of-visible-line): Handle return value of | ||
| 4 | next-single-property-change properly (Bug#9371). | ||
| 5 | |||
| 1 | 2012-03-22 Kenichi Handa <handa@m17n.org> | 6 | 2012-03-22 Kenichi Handa <handa@m17n.org> |
| 2 | 7 | ||
| 3 | * international/quail.el (quail-insert-kbd-layout): Fix previous | 8 | * international/quail.el (quail-insert-kbd-layout): Fix previous |
diff --git a/lisp/simple.el b/lisp/simple.el index 936037f5caa..8b04534455d 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -3688,7 +3688,8 @@ If ARG is zero, move to the beginning of the current line." | |||
| 3688 | (assq prop buffer-invisibility-spec)))))) | 3688 | (assq prop buffer-invisibility-spec)))))) |
| 3689 | (skip-chars-forward "^\n") | 3689 | (skip-chars-forward "^\n") |
| 3690 | (if (get-text-property (point) 'invisible) | 3690 | (if (get-text-property (point) 'invisible) |
| 3691 | (goto-char (next-single-property-change (point) 'invisible)) | 3691 | (goto-char (or (next-single-property-change (point) 'invisible) |
| 3692 | (point-max))) | ||
| 3692 | (goto-char (next-overlay-change (point)))) | 3693 | (goto-char (next-overlay-change (point)))) |
| 3693 | (end-of-line))) | 3694 | (end-of-line))) |
| 3694 | 3695 | ||