[Emacs-diffs] Changes to emacs/lisp/net/tramp.el

[Andreas Schwab]

Index: emacs/lisp/net/tramp.el
diff -c emacs/lisp/net/tramp.el:1.4 emacs/lisp/net/tramp.el:1.5
*** emacs/lisp/net/tramp.el:1.4 Thu Jun 27 11:52:50 2002
--- emacs/lisp/net/tramp.el     Thu Jun 27 12:50:06 2002
***************
*** 2978,2984 ****
  Requests suitable for Ange-FTP will be forwarded to Ange-FTP.
  Also see the variables `tramp-ftp-method', `tramp-default-method',
  and `tramp-default-method-alist'."
! j  (let ((a1 (rassq 'ange-ftp-hook-function file-name-handler-alist))
        (a2 (rassq 'ange-ftp-completion-hook-function file-name-handler-alist))
        (a3 (rassq 'tramp-file-name-handler file-name-handler-alist)))
      (setq file-name-handler-alist
--- 2978,2984 ----
  Requests suitable for Ange-FTP will be forwarded to Ange-FTP.
  Also see the variables `tramp-ftp-method', `tramp-default-method',
  and `tramp-default-method-alist'."
!   (let ((a1 (rassq 'ange-ftp-hook-function file-name-handler-alist))
        (a2 (rassq 'ange-ftp-completion-hook-function file-name-handler-alist))
        (a3 (rassq 'tramp-file-name-handler file-name-handler-alist)))
      (setq file-name-handler-alist