# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 786224268 0
# Node ID b53266f04fd995c98d364c4d724d75f1cf7c3436
# Parent  f444ea4046e9751b9475e566ce588833272776a1
(compilation-next-error-locus): Parsed column numbers are 1-origin.

diff -r f444ea4046e9 -r b53266f04fd9 lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Tue Nov 29 22:01:25 1994 +0000
+++ b/lisp/progmodes/compile.el	Wed Nov 30 19:37:48 1994 +0000
@@ -1000,7 +1000,8 @@
 			      (widen)
 			      (goto-line last-line)
 			      (if column
-				  (move-to-column column)
+				  ;; Columns in error msgs are 1-origin.
+				  (move-to-column (1- column))
 				(beginning-of-line))
 			      (setcdr next-error (point-marker))
 			      ;; Make all the other error messages referring