Mercurial > emacs
changeset 30687:34027013888a
(ffap-read-file-or-url-internal): Handle case the
DIR or STRING are nil.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Tue, 08 Aug 2000 18:30:21 +0000 |
| parents | 23c301a64c8f |
| children | f0a91dd9685b |
| files | lisp/ffap.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ffap.el Tue Aug 08 18:29:49 2000 +0000 +++ b/lisp/ffap.el Tue Aug 08 18:30:21 2000 +0000 @@ -1216,6 +1216,10 @@ (t t)))) (defun ffap-read-file-or-url-internal (string dir action) + (unless dir + (setq dir default-directory)) + (unless string + (setq string default-directory)) (if (ffap-url-p string) (ffap-read-url-internal string dir action) (read-file-name-internal string dir action)))