[Emacs-diffs] /srv/bzr/emacs/trunk r99987: * net/tramp.el(tramp-completion-handle-file-name-all-completions):

[Michael Albinus]

------------------------------------------------------------
revno: 99987
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Thu 2010-04-22 06:27:55 +0200
message:
  * net/tramp.el(tramp-completion-handle-file-name-all-completions):
  Ensure, that non remote files are still checked.  Oops.
modified:
  lisp/ChangeLog
  lisp/net/tramp.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-04-21 19:48:42 +0000
+++ b/lisp/ChangeLog    2010-04-22 04:27:55 +0000
@@ -1,3 +1,8 @@
+2010-04-22  Michael Albinus  <address@hidden>
+
+       * net/tramp.el(tramp-completion-handle-file-name-all-completions):
+       Ensure, that non remote files are still checked.  Oops.
+
 2010-04-21  Michael Albinus  <address@hidden>
 
        Fix Bug#5840.

=== modified file 'lisp/net/tramp.el'
--- a/lisp/net/tramp.el 2010-04-21 19:48:42 +0000
+++ b/lisp/net/tramp.el 2010-04-22 04:27:55 +0000
@@ -5719,9 +5719,10 @@
     (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.