diff options
| -rw-r--r-- | lisp/progmodes/compile.el | 4 |
1 files changed, 2 insertions, 2 deletions
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." | |||
| 862 | (or regexp "") command t t)) | 862 | (or regexp "") command t t)) |
| 863 | command) | 863 | command) |
| 864 | 864 | ||
| 865 | ;;;###autoload | ||
| 866 | (defvar grep-tree-last-regexp "") | 865 | (defvar grep-tree-last-regexp "") |
| 867 | (defvar grep-tree-last-files (car (car grep-tree-files-aliases))) | 866 | (defvar grep-tree-last-files (car (car grep-tree-files-aliases))) |
| 868 | 867 | ||
| 868 | ;;;###autoload | ||
| 869 | (defun grep-tree (regexp files dir &optional subdirs) | 869 | (defun grep-tree (regexp files dir &optional subdirs) |
| 870 | "Grep for REGEXP in FILES in directory tree rooted at DIR. | 870 | "Grep for REGEXP in FILES in directory tree rooted at DIR. |
| 871 | Collect output in a buffer. | 871 | Collect output in a buffer. |
| @@ -904,7 +904,7 @@ those sub directories of DIR." | |||
| 904 | (setq files grep-tree-last-files)) | 904 | (setq files grep-tree-last-files)) |
| 905 | (when files | 905 | (when files |
| 906 | (setq grep-tree-last-files files) | 906 | (setq grep-tree-last-files files) |
| 907 | (let ((mf (assoc files match-files-aliases))) | 907 | (let ((mf (assoc files grep-tree-files-aliases))) |
| 908 | (if mf | 908 | (if mf |
| 909 | (setq files (cdr mf))))) | 909 | (setq files (cdr mf))))) |
| 910 | (let ((command-args (grep-expand-command-macros | 910 | (let ((command-args (grep-expand-command-macros |