summaryrefslogtreecommitdiff
path: root/lisp/ffap.el
diff options
context:
space:
mode:
authordickmao <none>2021-08-03 12:02:48 -0400
committerLars Ingebrigtsen <larsi@gnus.org>2021-08-04 09:20:38 +0200
commit253b36bd40d1b342cdda09b0bee183788120f67e (patch)
treecb0ab8506c7bc11fbe90873358a8d9f7cbdfef10 /lisp/ffap.el
parentb4f3e6cabafb3e04292a650874d977c692dbad22 (diff)
downloademacs-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/ffap.el')
-rw-r--r--lisp/ffap.el6
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"