* lisp/progmodes/grep.el (grep-mode): Fix it for good!

Fixes: debbugs:8684

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 91c51b7925d..a759eb749ef 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-05-22  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * progmodes/grep.el (grep-mode): Fix it for good (bug#8684)!
+
 2011-05-22  Glenn Morris  <rgm@gnu.org>
 
         * files.el (hack-local-variables-prop-line): Small simplifications.
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index 04b54b1d662..db8e82193b3 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -700,7 +700,7 @@ This function is called from `compilation-filter-hook'."
        grep-regexp-alist)
   ;; compilation-directory-matcher can't be nil, so we set it to a regexp that
   ;; can never match.
-  (set (make-local-variable 'compilation-directory-matcher) "\\`a\\`")
+  (set (make-local-variable 'compilation-directory-matcher) '("\\`a\\`"))
   (set (make-local-variable 'compilation-process-setup-function)
        'grep-process-setup)
   (set (make-local-variable 'compilation-disable-input) t)