Mercurial > emacs
changeset 12974:fd7b8d2ba9e9
(list-directory): Set default-directory.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 30 Aug 1995 16:01:39 +0000 |
| parents | 2c0225a5aa91 |
| children | 9bad6a54e268 |
| files | lisp/files.el |
| diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Tue Aug 29 19:38:04 1995 +0000 +++ b/lisp/files.el Wed Aug 30 16:01:39 1995 +0000 @@ -2341,6 +2341,7 @@ (terpri) (save-excursion (set-buffer "*Directory*") + (setq default-directory (file-name-directory dirname)) (let ((wildcard (not (file-directory-p dirname)))) (insert-directory dirname switches wildcard (not wildcard)))))))