bug#13636: 24.3.50; tramp+ftp broken

[Michael Albinus]

Thierry Volpiatto <thierry.volpiatto@gmail.com> writes:

> Hi Michael,

Hi Thierry,

>> What happens, if you move your ~/.netrc away (temporarily)?
> It is working when I remove .netrc
> (file-remote-p "/ftp:mafreebox.freebox.fr:")
> => "/ftp:mafreebox.freebox.fr:"
>
> Here the entry in .netrc:
>
> machine mafreebox.freebox.fr login freebox password xxxxx

Finally, it looks like this error has been introduced with revno
#111057. Tramp/ange-ftp is just a victim, the same error might happen in
other constellations as well.

The following patch cures it for me:

--8<---------------cut here---------------start------------->8---
*** /usr/local/src/emacs/lisp/vc/vc-hooks.el.~111682~   2013-02-06 
21:11:32.205313196 +0100
--- /usr/local/src/emacs/lisp/vc/vc-hooks.el    2013-02-06 20:54:51.324349951 
+0100
***************
*** 858,865 ****
          (set (make-local-variable 'backup-inhibited) t))
        ;; Let the backend setup any buffer-local things he needs.
        (vc-call-backend backend 'find-file-hook))
!        ((let* ((truename (expand-file-name buffer-file-truename))
!              (link-type (and (not (equal buffer-file-name truename))
                               (vc-backend truename))))
          (cond ((not link-type) nil)   ;Nothing to do.
                ((eq vc-follow-symlinks nil)
--- 858,867 ----
          (set (make-local-variable 'backup-inhibited) t))
        ;; Let the backend setup any buffer-local things he needs.
        (vc-call-backend backend 'find-file-hook))
!        ((let* ((truename (and buffer-file-truename
!                             (expand-file-name buffer-file-truename)))
!              (link-type (and truename
!                              (not (equal buffer-file-name truename))
                               (vc-backend truename))))
          (cond ((not link-type) nil)   ;Nothing to do.
                ((eq vc-follow-symlinks nil)
--8<---------------cut here---------------end--------------->8---

Could you, please, check?

Best regards, Michael.