]> code.delx.au - gnu-emacs/commitdiff
(current_column): Update ptr differently at newline
authorRichard M. Stallman <rms@gnu.org>
Thu, 7 Aug 1997 09:01:52 +0000 (09:01 +0000)
committerRichard M. Stallman <rms@gnu.org>
Thu, 7 Aug 1997 09:01:52 +0000 (09:01 +0000)
so that current_column_bol_cache is set properly.

src/indent.c

index 5b51e405b6a99d4301b320c56e9c089a267f9068..a6fa7a9242001d0a797cdaf519365d44d78fefe8 100644 (file)
@@ -349,10 +349,12 @@ current_column ()
        col += XVECTOR (DISP_CHAR_VECTOR (dp, c))->size;
       else if (c >= 040 && c < 0177)
        col++;
-      else if (c == '\n')
-       break;
-      else if (c == '\r' && EQ (current_buffer->selective_display, Qt))
-       break;
+      else if (c == '\n'
+              || (c == '\r' && EQ (current_buffer->selective_display, Qt)))
+       {
+         ptr++;
+         break;
+       }
       else if (c == '\t')
        {
          if (tab_seen)
@@ -375,7 +377,7 @@ current_column ()
   if (ptr == BEGV_ADDR)
     current_column_bol_cache = BEGV;
   else
-    current_column_bol_cache = PTR_CHAR_POS ((ptr+1));
+    current_column_bol_cache = PTR_CHAR_POS (ptr);
   last_known_column = col;
   last_known_column_point = PT;
   last_known_column_modified = MODIFF;