diff options
| author | Richard M. Stallman | 1999-12-31 07:04:08 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1999-12-31 07:04:08 +0000 |
| commit | f6e2cbe3c113d1bf7324f9282cfcbe71c4a27128 (patch) | |
| tree | 104b7a565caddad8e53a5e77cb88712e354cab50 | |
| parent | f436a90ae2a6ab5abb932cc9adde1ef98166a199 (diff) | |
| download | emacs-f6e2cbe3c113d1bf7324f9282cfcbe71c4a27128.tar.gz emacs-f6e2cbe3c113d1bf7324f9282cfcbe71c4a27128.zip | |
(dired-get-filename): Don't call file-name-absolute-p with FILE if FILE is nil.
| -rw-r--r-- | lisp/ChangeLog | 10 | ||||
| -rw-r--r-- | lisp/dired.el | 2 |
2 files changed, 11 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ff377e2e85a..db484cfa2b3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,13 @@ | |||
| 1 | 1999-12-31 Richard M. Stallman <rms@caffeine.ai.mit.edu> | ||
| 2 | |||
| 3 | * dired.el (dired-get-filename): Don't call file-name-absolute-p | ||
| 4 | with FILE if FILE is nil. | ||
| 5 | |||
| 6 | 1999-12-30 Richard M. Stallman <rms@caffeine.ai.mit.edu> | ||
| 7 | |||
| 8 | * simple.el (choose-completion-string): In minibuffer, | ||
| 9 | do not delete the prompt string. | ||
| 10 | |||
| 1 | 1999-12-30 Gerd Moellmann <gerd@gnu.org> | 11 | 1999-12-30 Gerd Moellmann <gerd@gnu.org> |
| 2 | 12 | ||
| 3 | * bindings.el (make-mode-line-mouse-sensitive): Copy keymap | 13 | * bindings.el (make-mode-line-mouse-sensitive): Copy keymap |
diff --git a/lisp/dired.el b/lisp/dired.el index c56485033a6..73591530668 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -1336,7 +1336,7 @@ Optional arg NO-ERROR-IF-NOT-FILEP means return nil if no filename on | |||
| 1336 | "\\([^\\]\\|\\`\\)\"" file "\\1\\\\\"" nil t) | 1336 | "\\([^\\]\\|\\`\\)\"" file "\\1\\\\\"" nil t) |
| 1337 | file) | 1337 | file) |
| 1338 | "\""))))) | 1338 | "\""))))) |
| 1339 | (and (file-name-absolute-p file) | 1339 | (and file (file-name-absolute-p file) |
| 1340 | (setq already-absolute t)) | 1340 | (setq already-absolute t)) |
| 1341 | (and file buffer-file-coding-system | 1341 | (and file buffer-file-coding-system |
| 1342 | (not file-name-coding-system) | 1342 | (not file-name-coding-system) |