From f6e2cbe3c113d1bf7324f9282cfcbe71c4a27128 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 31 Dec 1999 07:04:08 +0000 Subject: [PATCH] (dired-get-filename): Don't call file-name-absolute-p with FILE if FILE is nil. --- lisp/ChangeLog | 10 ++++++++++ lisp/dired.el | 2 +- 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ff377e2e85a..db484cfa2b3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,13 @@ +1999-12-31 Richard M. Stallman + + * dired.el (dired-get-filename): Don't call file-name-absolute-p + with FILE if FILE is nil. + +1999-12-30 Richard M. Stallman + + * simple.el (choose-completion-string): In minibuffer, + do not delete the prompt string. + 1999-12-30 Gerd Moellmann * 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 "\\([^\\]\\|\\`\\)\"" file "\\1\\\\\"" nil t) file) "\""))))) - (and (file-name-absolute-p file) + (and file (file-name-absolute-p file) (setq already-absolute t)) (and file buffer-file-coding-system (not file-name-coding-system)