(ffap-complete-as-file-p): Use minibuffer-completing-file-name.

2003-02-10 22:21:46 +00:00
parent 4c86cca05a
commit 9925c4191b
1 changed files with 1 additions and 3 deletions
--- 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)