[Emacs-diffs] Changes to emacs/lisp/progmodes/grep.el

[Kim F. Storm]

Index: emacs/lisp/progmodes/grep.el
diff -u emacs/lisp/progmodes/grep.el:1.53 emacs/lisp/progmodes/grep.el:1.54
--- emacs/lisp/progmodes/grep.el:1.53   Fri Apr 28 23:39:02 2006
+++ emacs/lisp/progmodes/grep.el        Mon May  1 09:33:10 2006
@@ -581,8 +581,13 @@
        (case-fold-search nil))
     (dolist (kw grep-expand-keywords command)
       (if (string-match (car kw) command)
-         (setq command (replace-match (or (eval (cdr kw)) "")
-                                      t t command))))))
+         (setq command
+               (replace-match
+                (or (if (symbolp (cdr kw))
+                        (eval (cdr kw))
+                      (save-match-data (eval (cdr kw))))
+                    "")
+                t t command))))))
 
 (defun grep-read-regexp ()
   "Read regexp arg for interactive grep."