diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ffap.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ffap.el b/lisp/ffap.el index 2e88adfaf4a..7e716f7be2b 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -1618,7 +1618,8 @@ which may actually result in an URL rather than a filename." ;; allows you to switch back to reading a file name, ;; while other prompters, like ido, really expect a ;; file, and don't allow you to edit it if it's an URL. - (funcall #'read-file-name-default prompt guess guess) + (funcall #'read-file-name-default prompt guess guess + (confirm-nonexistent-file-or-buffer)) (unless guess (setq guess default-directory)) (unless (ffap-file-remote-p guess) @@ -1629,7 +1630,9 @@ which may actually result in an URL rather than a filename." #'read-directory-name #'read-file-name) prompt - (file-name-directory guess) nil nil + (file-name-directory guess) + nil + (confirm-nonexistent-file-or-buffer) (file-name-nondirectory guess)))) ;; Remove the special handler manually. We used to just let-bind ;; file-name-handler-alist to preserve its value, but that caused |