Mercurial > hg > xemacs-beta

diff src/redisplay.c @ 298:70ad99077275 r21-0b47

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b47
author cvs
date Mon, 13 Aug 2007 10:39:40 +0200
parents 4b85ae5eabfb
children afd57c14dfc8
line wrap: on
line diff
--- a/src/redisplay.c	Mon Aug 13 10:38:47 2007 +0200
+++ b/src/redisplay.c	Mon Aug 13 10:39:40 2007 +0200
@@ -5756,7 +5756,10 @@
       /* print the current column */
     case 'c':
       {
-	int col = current_column (b) + !!column_number_start_at_one;
+        Bufpos pt = (w == XWINDOW (Fselected_window (Qnil)))
+                    ? BUF_PT (b)
+                    : marker_position (w->pointm[type]);
+	int col = column_at_point (b, pt, 1) + !!column_number_start_at_one;
 	char buf[32];
 
 	long_to_string (buf, col);