[Emacs-diffs] /srv/bzr/emacs/trunk r99539: * progmodes/compile.el (compilation-error-regexp-alist-alist): In

[Chong Yidong]

------------------------------------------------------------
revno: 99539
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sat 2010-02-20 08:53:06 -0500
message:
  * progmodes/compile.el (compilation-error-regexp-alist-alist): In
  `watcom' anchor regexp to start of line, to avoid slowness
  (Bug#5599).
modified:
  lisp/ChangeLog
  lisp/progmodes/compile.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-02-20 08:59:16 +0000
+++ b/lisp/ChangeLog    2010-02-20 13:53:06 +0000
@@ -1,3 +1,9 @@
+2010-02-20  Kevin Ryde  <address@hidden>
+
+       * progmodes/compile.el (compilation-error-regexp-alist-alist): In
+       `watcom' anchor regexp to start of line, to avoid slowness
+       (Bug#5599).
+
 2010-02-20  Eli Zaretskii  <address@hidden>
 
        * subr.el (remove-yank-excluded-properties): Explain in a comment

=== modified file 'lisp/progmodes/compile.el'
--- a/lisp/progmodes/compile.el 2010-01-13 08:35:10 +0000
+++ b/lisp/progmodes/compile.el 2010-02-20 13:53:06 +0000
@@ -350,7 +350,7 @@
      "^\\([^, \n\t]+\\), line \\([0-9]+\\), char \\([0-9]+\\)[:., \(-]" 1 2 3)
 
     (watcom
-     "\\(\\(?:[a-zA-Z]:\\)?[^:(\t\n]+\\)(\\([0-9]+\\)): ?\
+     "^[ \t]*\\(\\(?:[a-zA-Z]:\\)?[^:(\t\n]+\\)(\\([0-9]+\\)): ?\
 \\(?:\\(Error! E[0-9]+\\)\\|\\(Warning! W[0-9]+\\)\\):"
      1 2 nil (4))