Mercurial > emacs
changeset 55747:ac9369751587
(grep-tree): Ensure that DIR argument is
interpreted as a directory.
| author | Jesper Harder <harder@ifa.au.dk> |
|---|---|
| date | Sun, 23 May 2004 19:08:48 +0000 |
| parents | e3f64aa0875d |
| children | 2cb1cd498a3c |
| files | lisp/ChangeLog lisp/progmodes/grep.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sat May 22 22:23:13 2004 +0000 +++ b/lisp/ChangeLog Sun May 23 19:08:48 2004 +0000 @@ -1,3 +1,8 @@ +2004-05-23 Jesper Harder <harder@ifa.au.dk> + + * progmodes/grep.el (grep-tree): Ensure that DIR argument is + interpreted as a directory. + 2004-05-22 Richard M. Stallman <rms@gnu.org> * textmodes/paragraphs.el (sentence-end): Match unicode curly quotes
--- a/lisp/progmodes/grep.el Sat May 22 22:23:13 2004 +0000 +++ b/lisp/progmodes/grep.el Sun May 23 19:08:48 2004 +0000 @@ -533,7 +533,8 @@ (files (read-string (concat "Search for \"" regexp "\" in files (default " grep-tree-last-files "): "))) (dir - (read-directory-name "Base directory: " nil default-directory t))) + (file-name-as-directory + (read-directory-name "Base directory: " nil default-directory t)))) (list regexp files dir))) (unless grep-tree-command (grep-compute-defaults))