Sascha Wilde <[EMAIL PROTECTED]> writes:
> Seems to be still buggy:
>
> C-x C-f /et TAB
>
> results in:
>
> Debugger entered--Lisp error: (wrong-type-argument stringp ("etc/"))
> file-exists-p(("etc/"))
> try-completion("et" (("etc/")) file-exists-p)
> tramp-completion-handle-file-name-completion("et" "/" file-exists-p)
> apply(tramp-completion-handle-file-name-completion ("et" "/" file-exists-p))
> tramp-completion-file-name-handler(file-name-completion "et" "/"
> file-exists-p)
> read-file-name-internal("~/.worklog//et" "~/.worklog/" nil)
> minibuffer-complete()
> call-interactively(minibuffer-complete)
> read-file-name("Find file: " nil "/home/wilde/.worklog/" nil)
> find-file-read-args("Find file: " nil)
> call-interactively(find-file)
Please try the appended patch (currently I have no CVS access).
> cheers
> sascha
Best regards, Michael.
*** /tmp/tramp.el.~1~ Wed Dec 20 14:22:49 2006
--- /tmp/tramp.el Wed Dec 20 14:22:49 2006
***************
*** 2868,2874 ****
filename
(mapcar (lambda (x) (cons x nil))
(file-name-all-completions filename directory))
! predicate)))
;; cp, mv and ln
--- 2868,2875 ----
filename
(mapcar (lambda (x) (cons x nil))
(file-name-all-completions filename directory))
! '(lambda (x)
! (funcall predicate (expand-file-name (car x) directory))))))
;; cp, mv and ln
***************
*** 4635,4641 ****
(try-completion
filename
(mapcar 'list (file-name-all-completions filename directory))
! predicate))
;; I misuse a little bit the tramp-file-name structure in order to handle
;; completion possibilities for partial methods / user names / host names.
--- 4636,4643 ----
(try-completion
filename
(mapcar 'list (file-name-all-completions filename directory))
! '(lambda (x)
! (funcall predicate (expand-file-name (car x) directory)))))
;; I misuse a little bit the tramp-file-name structure in order to handle
;; completion possibilities for partial methods / user names / host names.
_______________________________________________
emacs-pretest-bug mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
