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

[Kai Großjohann]

Index: emacs/lisp/net/tramp.el
diff -c emacs/lisp/net/tramp.el:1.45 emacs/lisp/net/tramp.el:1.46
*** emacs/lisp/net/tramp.el:1.45        Sun May 30 21:00:21 2004
--- emacs/lisp/net/tramp.el     Sat Jun 26 15:28:08 2004
***************
*** 3542,3548 ****
  
  (defun tramp-handle-file-remote-p (filename)
    "Like `file-remote-p' for tramp files."
!   (when (tramp-tramp-file-p filename) t))
  
  (defun tramp-handle-insert-file-contents
    (filename &optional visit beg end replace)
--- 3542,3555 ----
  
  (defun tramp-handle-file-remote-p (filename)
    "Like `file-remote-p' for tramp files."
!   (when (tramp-tramp-file-p filename)
!     (with-parsed-tramp-file-name filename nil
!       (make-tramp-file-name
!        :multi-method multi-method
!        :method method
!        :user user
!        :host host
!        :localname ""))))
  
  (defun tramp-handle-insert-file-contents
    (filename &optional visit beg end replace)