Fontise bytecomp Error lines more correctly

Fix suggested by Johan Bockgård.

Fixes: debbugs:2490

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dfea2f4..d503171 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2011-07-12  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * progmodes/compile.el (compilation-error-regexp-alist-alist):
+       Fontise bytecomp Error lines more correctly (bug#2490).  Fix
+       suggested by Johan Bockgård.
+
        * subr.el (remove-duplicates): Remove; `delete-dups' is sufficient.
 
        * dired-x.el (dired-guess-default): Use `delete-dups'.

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 3a9463f..d931676 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -251,7 +251,7 @@ of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"?:" 3 2 nil (1))
 \\([0-9]*[^0-9\n]\\(?:[^\n :]\\| [^-/\n]\\|:[^ \n]\\)*?\\): ?\
 \\([0-9]+\\)\\(?:[.:]\\([0-9]+\\)\\)?\
 \\(?:-\\([0-9]+\\)?\\(?:\\.\\([0-9]+\\)\\)?\\)?:\
-\\(?: *\\(\\(?:Future\\|Runtime\\)?[Ww]arning\\|W:\\)\\|\
+\\(?: *\\(\\(?:Future\\|Runtime\\)?[Ww]arning\\|W:\\|[Ee]rror\\)\\|\
  *\\([Ii]nfo\\(?:\\>\\|rmationa?l?\\)\\|I:\\|instantiated from\\|[Nn]ote\\)\\|\
 \[0-9]?\\(?:[^0-9\n]\\|$\\)\\|[0-9][0-9][0-9]\\)"
      1 (2 . 4) (3 . 5) (6 . 7))