Joe Wells <jbw at macs.hw.ac.uk> (tiny change)

(tex-compilation-parse-errors): Also match TeX `--file-line-error'
format.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 596d972932b1bdc536fe517246307a268ef08219..c2b1e6be27612e147ac84c990bd217ac3ebf7c73 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,13 @@
+2007-09-17  Glenn Morris  <rgm@gnu.org>
+
+       * textmodes/tex-mode.el (tex-compilation-parse-errors): Prefer the
+       filename from `--file-line-error', if it is available.
+
+2007-09-17  Joe Wells  <jbw@macs.hw.ac.uk>  (tiny change)
+
+       * textmodes/tex-mode.el (tex-compilation-parse-errors): Also match
+       TeX `--file-line-error' format.
+
 2007-09-17  Dan Nicolaescu  <dann@ics.uci.edu>
 
        * xt-mouse.el: Delete add-hook calls that were moved to

diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 986c4fca20ba8bf3c7c2c5d6de7cda2e448eae41..85cb77b69cc66aab5165e066bab16496c6d5800a 100644 (file)
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -2037,7 +2037,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