changeset 49694:3738a81ff66f

(ffap-complete-as-file-p): Use minibuffer-completing-file-name.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 10 Feb 2003 22:21:46 +0000
parents ae8bfbc6d9ef
children 287be189a2e6
files lisp/ffap.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ffap.el	Mon Feb 10 22:20:47 2003 +0000
+++ b/lisp/ffap.el	Mon Feb 10 22:21:46 2003 +0000
@@ -1240,9 +1240,7 @@
   ;; 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)