diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-06 12:24:32 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-06 12:24:32 +0200 |
| commit | 9f3f7f1ec4fdb7152ec5edd5313924fb3575d44f (patch) | |
| tree | a363dccbe3e66fa50652aa4542594b4daf6d153e /lisp/ffap.el | |
| parent | eaca6378d2c4b94bc70a7979642502a80bfacd11 (diff) | |
| download | emacs-9f3f7f1ec4fdb7152ec5edd5313924fb3575d44f.tar.gz emacs-9f3f7f1ec4fdb7152ec5edd5313924fb3575d44f.tar.bz2 emacs-9f3f7f1ec4fdb7152ec5edd5313924fb3575d44f.zip | |
Make ffap-file-finder work again
* lisp/ffap.el (find-file-at-point): Allow people to set
ffap-file-finder again (bug#50279).
* lisp/ido.el (ido-everywhere): Add an interstitial to fulfil
ffap-file-handler semantics.
Diffstat (limited to 'lisp/ffap.el')
| -rw-r--r-- | lisp/ffap.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ffap.el b/lisp/ffap.el index 88b4bce9fd1..7ea05dccbdd 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -1623,9 +1623,9 @@ and `ffap-url-at-point'." ((or (not ffap-newfile-prompt) (file-exists-p filename) (y-or-n-p "File does not exist, create buffer? ")) - (find-file - ;; expand-file-name fixes "~/~/.emacs" bug - (expand-file-name filename))) + (funcall ffap-file-finder + ;; expand-file-name fixes "~/~/.emacs" bug + (expand-file-name filename))) ;; User does not want to find a non-existent file: ((signal 'file-missing (list "Opening file buffer" "No such file or directory" |