From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 7 Aug 1997 09:01:52 +0000 (+0000)
Subject: (current_column): Update ptr differently at newline
X-Git-Tag: emacs-20.1~739
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7050d53077c688c259520841687b963c605f57f3;p=emacs.git

(current_column): Update ptr differently at newline
so that current_column_bol_cache is set properly.
---

diff --git a/src/indent.c b/src/indent.c
index 5b51e405b6a..a6fa7a92420 100644
--- a/src/indent.c
+++ b/src/indent.c
@@ -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;