From: Michael Albinus <albinus@detlef>
Date: Thu, 22 Apr 2010 04:30:16 +0000 (+0200)
Subject: * net/tramp.el(tramp-completion-handle-file-name-all-completions):
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~435
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=489fe4c2ea3f7b1a7165a2387b5e018f69520f1b;p=emacs.git

* net/tramp.el(tramp-completion-handle-file-name-all-completions):
Ensure, that non remote files are still checked.  Oops.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ad8f74c7489..e701f59554b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-04-22  Michael Albinus  <michael.albinus@gmx.de>
+
+	* net/tramp.el (tramp-completion-handle-file-name-all-completions):
+	Ensure, that non remote files are still checked.  Oops.
+
 2010-04-21  Michael Albinus  <michael.albinus@gmx.de>
 
 	Fix Bug#5840.
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 5ba1b184bc5..05f7b94edda 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -5719,9 +5719,10 @@ not in completion mode."
     (append
      result1
      (condition-case nil
-	 (when (tramp-connectable-p fullname)
-	   (tramp-completion-run-real-handler
-	    'file-name-all-completions (list filename directory)))
+	 (apply (if (tramp-connectable-p fullname)
+		    'tramp-completion-run-real-handler
+		  'tramp-run-real-handler)
+		'file-name-all-completions (list (list filename directory)))
        (error nil)))))
 
 ;; Method, host name and user name completion for a file.