aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes/compile.el
diff options
context:
space:
mode:
authorKim F. Storm <[email protected]>2002-07-12 23:56:12 +0000
committerKim F. Storm <[email protected]>2002-07-12 23:56:12 +0000
commitcf3d4f6d57ddfeaa5bb72d399bdf47e45e3d4782 (patch)
treece00ac99bc6c9dd2c8d6810f6d36b113cfff8401 /lisp/progmodes/compile.el
parent325309f50513a4cc7719329857c3bb6f2149c655 (diff)
(grep-tree): Fixed autoload.
Corrected use of undefined variable `match-files-aliases'.
Diffstat (limited to 'lisp/progmodes/compile.el')
-rw-r--r--lisp/progmodes/compile.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index c06d01594b..b0f2457df6 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