From 9925c4191b6deb8efd24dceed27ff2aa62b6fa05 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 10 Feb 2003 22:21:46 +0000 Subject: [PATCH] (ffap-complete-as-file-p): Use minibuffer-completing-file-name. --- lisp/ffap.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/ffap.el b/lisp/ffap.el index 56294cf6d81..2d481a5e46f 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -1240,9 +1240,7 @@ which may actually result in an url rather than a filename." ;; Note: t and non-nil mean somewhat different reasons. (if (eq minibuffer-completion-table 'ffap-read-file-or-url-internal) (not (ffap-url-p (buffer-string))) ; t - (memq minibuffer-completion-table - '(read-file-name-internal read-directory-name-internal)) ; list - )) + (and minibuffer-completing-file-name '(t)))) ;list (and (featurep 'complete) -- 2.39.2