diff options
| author | dickmao <none> | 2021-08-03 12:02:48 -0400 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-04 09:20:38 +0200 |
| commit | 253b36bd40d1b342cdda09b0bee183788120f67e (patch) | |
| tree | cb0ab8506c7bc11fbe90873358a8d9f7cbdfef10 /lisp | |
| parent | b4f3e6cabafb3e04292a650874d977c692dbad22 (diff) | |
| download | emacs-253b36bd40d1b342cdda09b0bee183788120f67e.tar.gz emacs-253b36bd40d1b342cdda09b0bee183788120f67e.tar.bz2 emacs-253b36bd40d1b342cdda09b0bee183788120f67e.zip | |
ffap ido accommodation
Now that ffap-file-finder can be ido-find-file, the
noninteractive portion of find-file-at-point cannot
assume ffap-file-finder always takes an argument
(ido-find-file does not).
* lisp/ffap.el (find-file-at-point): Do not call ffap-file-finder.
* test/lisp/ffap-tests.el (ffap-ido-mode): Test it.
Diffstat (limited to 'lisp')
| -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 b398d1c9f21..9be9c2906ea 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -1670,9 +1670,9 @@ See also the variables `ffap-dired-wildcards', `ffap-newfile-prompt', ((or (not ffap-newfile-prompt) (file-exists-p filename) (y-or-n-p "File does not exist, create buffer? ")) - (funcall ffap-file-finder - ;; expand-file-name fixes "~/~/.emacs" bug sent by CHUCKR. - (expand-file-name filename))) + (find-file + ;; expand-file-name fixes "~/~/.emacs" bug sent by CHUCKR. + (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" |