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

[Miles Bader]

Index: emacs/lisp/net/tramp.el
diff -c emacs/lisp/net/tramp.el:1.34.2.7 emacs/lisp/net/tramp.el:1.34.2.8
*** emacs/lisp/net/tramp.el:1.34.2.7    Tue Jul  6 09:38:17 2004
--- emacs/lisp/net/tramp.el     Tue Jul  6 10:23:37 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)