[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Tramp is keeping ange-ftp from finding .netrc
From: |
Michael Albinus |
Subject: |
Re: Tramp is keeping ange-ftp from finding .netrc |
Date: |
Tue, 19 Jul 2005 22:53:50 +0200 |
User-agent: |
Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (gnu/linux) |
<address@hidden> writes:
> I need to use a .netrc file for several reasons.
> But I keep running into a problem where ange-ftp fails to read the
> .netrc.
Could you, please, try the following patch:
magdalene:~/src/emacs/lisp/net> diff -c tramp.el.orig tramp.el
*** tramp.el.orig 2005-07-19 22:50:45.000000000 +0200
--- tramp.el 2005-07-19 22:51:23.000000000 +0200
***************
*** 4824,4835 ****
(defun tramp-completion-handle-expand-file-name (name &optional dir)
"Like `expand-file-name' for tramp files."
(let ((fullname (concat (or dir default-directory) name)))
! (tramp-drop-volume-letter
! (if (tramp-completion-mode fullname)
! (tramp-run-real-handler
! 'expand-file-name (list name dir))
! (tramp-completion-run-real-handler
! 'expand-file-name (list name dir))))))
;;; Internal Functions:
--- 4824,4834 ----
(defun tramp-completion-handle-expand-file-name (name &optional dir)
"Like `expand-file-name' for tramp files."
(let ((fullname (concat (or dir default-directory) name)))
! (if (tramp-completion-mode fullname)
! (tramp-run-real-handler
! 'expand-file-name (list name dir))
! (tramp-completion-run-real-handler
! 'expand-file-name (list name dir)))))
;;; Internal Functions:
> Richard Bielawski
Best regards, Michael.