Fix to `ant' compile regexp.

* lisp/progmodes/compile.el (compilation-error-regexp-alist-alist):
  Fix 2011-05-09 change to `ant' regexp.

2 files changed, 3 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 53fbdf00087..7ef01205bd2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,8 @@
 
         * progmodes/compile.el (compilation-error-properties): Fix
         confusion between file struct and message struct (Bug#9319).
+        (compilation-error-regexp-alist-alist): Fix 2011-05-09 change to
+        `ant' regexp.
 
         * net/browse-url.el (browse-url-firefox): Don't call
         browse-url-firefox-sentinel unless using -remote (Bug#9328).
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 33bd9ff96a7..2fb0ac879b2 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -145,7 +145,7 @@ of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"?:" 3 2 nil (1))
 
     (ant
      "^[ \t]*\\[[^] \n]+\\][ \t]*\\([^: \n]+\\):\\([0-9]+\\):\\(?:\\([0-9]+\\):\\([0-9]+\\):\\([0-9]+\\):\\)?\
-\\( warning\\)?" 1 (2 . 4) (3 . 5) (4))
+\\( warning\\)?" 1 (2 . 4) (3 . 5) (6))
 
     (bash
      "^\\([^: \n\t]+\\): line \\([0-9]+\\):" 1 2)