aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris <[email protected]>2007-09-17 07:01:41 +0000
committerGlenn Morris <[email protected]>2007-09-17 07:01:41 +0000
commitaf751646bdd75378f4e62d549321e9a8080d018c (patch)
treebca1dda8ecd8dcab9235b94f841f7da630408864
parent650015841052f05ea3cfbd47d9a618ba83da96ff (diff)
Joe Wells <jbw at macs.hw.ac.uk> (tiny change)
(tex-compilation-parse-errors): Also match TeX `--file-line-error' format.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/textmodes/tex-mode.el3
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 14ccb0b285..ce68071ddd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-09-17 Glenn Morris <[email protected]>
+
+ * textmodes/tex-mode.el (tex-compilation-parse-errors): Prefer the
+ filename from `--file-line-error', if it is available.
+
2007-09-17 Joe Wells <[email protected]> (tiny change)
* textmodes/tex-mode.el (tex-compilation-parse-errors): Also match
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index c4380c59d9..73075ce059 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -2016,7 +2016,8 @@ for the error messages."
(goto-char compilation-parsing-end)
;; Parse messages.
(while (and (not (or found-desired (eobp)))
- (prog1 (re-search-forward "^! " nil 'move)
+ (prog1 (re-search-forward
+ "^\\(?:[^:\n]+:[[:digit:]]+:\\|!\\) " nil 'move)
(setq begin-of-error (match-beginning 0)
end-of-error (match-end 0)))
(re-search-forward