From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 17 Jul 1997 06:29:36 +0000 (+0000)
Subject: (display_text_line): Handle the case of point being in
X-Git-Tag: emacs-20.1~1117
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1fca3fae800a27dbe292463d9d9df5dcee30c6ae;p=emacs.git

(display_text_line): Handle the case of point being in
the invisible part of the line beyond the left margin.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index d7c0bfe34bc..8b41cf9717d 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -2993,6 +2993,16 @@ display_text_line (w, start, vpos, hpos, taboffset, ovstr_done)
   next_boundary = pos;
   p1prev = p1;
   prevpos = pos;
+
+  /* If the window is hscrolled and point is in the invisible part of the
+     current line beyond the left margin we can record the cursor location
+     right away.  */
+  if (hscroll && start <= PT && PT < pos && cursor_vpos < 0)
+    {
+      cursor_vpos = vpos;
+      cursor_hpos = p1 - leftmargin;
+    }
+
   while (p1 < endp)
     {
       if (pos >= pause)