From: Kim F. Storm <storm@cua.dk>
Date: Fri, 12 Jul 2002 23:56:12 +0000 (+0000)
Subject: (grep-tree): Fixed autoload.
X-Git-Tag: ttn-vms-21-2-B4~14161
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cf3d4f6d57ddfeaa5bb72d399bdf47e45e3d4782;p=emacs.git

(grep-tree): Fixed autoload.
Corrected use of undefined variable `match-files-aliases'.
---

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index c06d01594bd..b0f2457df66 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -862,10 +862,10 @@ easily repeat a find command."
 				  (or regexp "") command t t))
   command)
 
-;;;###autoload
 (defvar grep-tree-last-regexp "")
 (defvar grep-tree-last-files (car (car grep-tree-files-aliases)))
 
+;;;###autoload
 (defun grep-tree (regexp files dir &optional subdirs)
   "Grep for REGEXP in FILES in directory tree rooted at DIR.
 Collect output in a buffer.
@@ -904,7 +904,7 @@ those sub directories of DIR."
     (setq files grep-tree-last-files))
   (when files
     (setq grep-tree-last-files files)
-    (let ((mf (assoc files match-files-aliases)))
+    (let ((mf (assoc files grep-tree-files-aliases)))
       (if mf
 	  (setq files (cdr mf)))))
   (let ((command-args (grep-expand-command-macros