From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 2 Nov 2004 09:08:42 +0000 (+0000)
Subject: (back_to_previous_visible_line_start):
X-Git-Tag: ttn-vms-21-2-B4~4249
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d41b17ea2faaa4185b1410c7af27f6b31d0b3251;p=emacs.git

(back_to_previous_visible_line_start):
Subtract 1 from pos when checking previous newline for invisibility.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index dfb2e8198a5..2ed455e7f6b 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -4555,7 +4555,8 @@ back_to_previous_visible_line_start (it)
 	{
 	  Lisp_Object prop;
 
-	  prop = Fget_char_property (make_number (IT_CHARPOS (*it)),
+	  /* Check the newline before point for invisibility.  */
+	  prop = Fget_char_property (make_number (IT_CHARPOS (*it) - 1),
 				     Qinvisible, it->window);
 	  if (TEXT_PROP_MEANS_INVISIBLE (prop))
 	    visible_p = 0;