diff options
| author | Andreas Schwab | 2002-10-16 21:27:40 +0000 |
|---|---|---|
| committer | Andreas Schwab | 2002-10-16 21:27:40 +0000 |
| commit | 34cd7b3ca0b94652de6da85373e62f7bc0a99e8d (patch) | |
| tree | 490e46b21538df43fc3c9ae179d4857fce2ee632 | |
| parent | 15fa165878655e2bcb85a9b2c2339eb74b746c36 (diff) | |
| download | emacs-34cd7b3ca0b94652de6da85373e62f7bc0a99e8d.tar.gz emacs-34cd7b3ca0b94652de6da85373e62f7bc0a99e8d.zip | |
(dired-readin-insert): Expand dired-directory.
| -rw-r--r-- | lisp/dired.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index e26447fbd2f..5fe4e4aedbd 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -654,6 +654,7 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh." | |||
| 654 | file-list (cdr dired-directory)) | 654 | file-list (cdr dired-directory)) |
| 655 | (setq dir dired-directory | 655 | (setq dir dired-directory |
| 656 | file-list nil)) | 656 | file-list nil)) |
| 657 | (setq dir (expand-file-name dir)) | ||
| 657 | (if (and (equal "" (file-name-nondirectory dir)) | 658 | (if (and (equal "" (file-name-nondirectory dir)) |
| 658 | (not file-list)) | 659 | (not file-list)) |
| 659 | ;; If we are reading a whole single directory... | 660 | ;; If we are reading a whole single directory... |