# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 703612865 0
# Node ID 0085dcbad4bdecb85c97855f090a849b67e68572
# Parent  4de357ef5dba017c50180b82d25ad6e1fa2f875f
*** empty log message ***

diff -r 4de357ef5dba -r 0085dcbad4bd src/indent.c
--- a/src/indent.c	Sat Apr 18 00:05:15 1992 +0000
+++ b/src/indent.c	Sat Apr 18 16:01:05 1992 +0000
@@ -461,7 +461,7 @@
 		{
 		  while (++pos < to && FETCH_CHAR (pos) != '\n');
 		}
-	      while (selective > 0 && position_indentation (pos + 1) >= selective);
+	      while (pos < to && position_indentation (pos + 1) >= selective);
 	      pos--;
 	      /* Allow for the " ..." that is displayed for them. */
 	      if (selective_rlen)
@@ -470,16 +470,17 @@
 		  if (hpos >= width)
 		    hpos = width;
 		}
+	      /* We have skipped the invis text, but not the newline after.  */
 	    }
 	  else
 	    {
 	      /* A visible line.  */
 	      vpos++;
 	      hpos = 0;
+	      hpos -= hscroll;
+	      if (hscroll > 0) hpos++; /* Count the ! on column 0 */
+	      tab_offset = 0;
 	    }
-	  hpos -= hscroll;
-	  if (hscroll > 0) hpos++; /* Count the ! on column 0 */
-	  tab_offset = 0;
 	}
       else if (c == CR && selective < 0)
 	{
@@ -518,6 +519,7 @@
 	      /* Truncating: skip to newline.  */
 	      while (pos < to && FETCH_CHAR (pos) != '\n') pos++;
 	      pos--;
+	      hpos = width;
 	    }
 	  else
 	    {