diff options
| -rw-r--r-- | lisp/progmodes/compile.el | 4 |
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." (cons (list subexpr (+ subexpr (nth 1 (car alist))) (+ subexpr (nth 2 (car alist))) - (and (nth 2 (car alist)) - (+ subexpr (nth 2 (car alist))))) + (and (nth 3 (car alist)) + (+ subexpr (nth 3 (car alist))))) error-regexp-groups)) (setq subexpr (+ subexpr 1 (count-regexp-groupings (car (car alist))))) (setq alist (cdr alist))) |