aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRoland McGrath1994-04-20 19:52:37 +0000
committerRoland McGrath1994-04-20 19:52:37 +0000
commit8425a49a3c9935fb9b0350430c712808aaa768eb (patch)
treedb1a2b4150594082eeffa7c86687d628b1890ebd
parentdd6e8a8dd0748654c28875dfbbeb11e087fc90ae (diff)
downloademacs-8425a49a3c9935fb9b0350430c712808aaa768eb.tar.gz
emacs-8425a49a3c9935fb9b0350430c712808aaa768eb.zip
(compilation-parse-errors): Fix references for column number, 3 elt not
2nd.
-rw-r--r--lisp/progmodes/compile.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 813412942d1..cc7e0b6fb28 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1100,8 +1100,8 @@ See variable `compilation-parse-errors-function' for the interface it uses."
1100 (cons (list subexpr 1100 (cons (list subexpr
1101 (+ subexpr (nth 1 (car alist))) 1101 (+ subexpr (nth 1 (car alist)))
1102 (+ subexpr (nth 2 (car alist))) 1102 (+ subexpr (nth 2 (car alist)))
1103 (and (nth 2 (car alist)) 1103 (and (nth 3 (car alist))
1104 (+ subexpr (nth 2 (car alist))))) 1104 (+ subexpr (nth 3 (car alist)))))
1105 error-regexp-groups)) 1105 error-regexp-groups))
1106 (setq subexpr (+ subexpr 1 (count-regexp-groupings (car (car alist))))) 1106 (setq subexpr (+ subexpr 1 (count-regexp-groupings (car (car alist)))))
1107 (setq alist (cdr alist))) 1107 (setq alist (cdr alist)))