[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r107655: Fix corner case in end-of-vi
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r107655: Fix corner case in end-of-visible-line. |
Date: |
Thu, 22 Mar 2012 15:38:05 +0800 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 107655
fixes bug(s): http://debbugs.gnu.org/9371
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Thu 2012-03-22 15:38:05 +0800
message:
Fix corner case in end-of-visible-line.
* lisp/simple.el (end-of-visible-line): Handle return value of
next-single-property-change properly.
modified:
lisp/ChangeLog
lisp/simple.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-03-22 04:23:16 +0000
+++ b/lisp/ChangeLog 2012-03-22 07:38:05 +0000
@@ -1,3 +1,8 @@
+2012-03-22 Chong Yidong <address@hidden>
+
+ * simple.el (end-of-visible-line): Handle return value of
+ next-single-property-change properly (Bug#9371).
+
2012-03-22 Kenichi Handa <address@hidden>
* international/quail.el (quail-insert-kbd-layout): Fix previous
=== modified file 'lisp/simple.el'
--- a/lisp/simple.el 2012-03-12 18:21:35 +0000
+++ b/lisp/simple.el 2012-03-22 07:38:05 +0000
@@ -3688,7 +3688,8 @@
(assq prop buffer-invisibility-spec))))))
(skip-chars-forward "^\n")
(if (get-text-property (point) 'invisible)
- (goto-char (next-single-property-change (point) 'invisible))
+ (goto-char (or (next-single-property-change (point) 'invisible)
+ (point-max)))
(goto-char (next-overlay-change (point))))
(end-of-line)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r107655: Fix corner case in end-of-visible-line.,
Chong Yidong <=