Mercurial > emacs
changeset 105893:535ef0fe1689
* net/tramp.el (tramp-handle-copy-directory): Don't use
`file-remote-p' (due to compatibility).
| author | Michael Albinus <michael.albinus@gmx.de> |
|---|---|
| date | Sat, 07 Nov 2009 23:52:48 +0000 |
| parents | ac069dcbfe75 |
| children | ae9f17f9fa46 |
| files | lisp/net/tramp.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/net/tramp.el Sat Nov 07 23:51:17 2009 +0000 +++ b/lisp/net/tramp.el Sat Nov 07 23:52:48 2009 +0000 @@ -3404,8 +3404,9 @@ ;; When DIRNAME and NEWNAME are remote, they must have ;; the same method. (or (null t1) (null t2) - (string-equal (file-remote-p dirname 'method) - (file-remote-p newname 'method)))) + (string-equal + (tramp-file-name-method (tramp-dissect-file-name dirname)) + (tramp-file-name-method (tramp-dissect-file-name newname))))) ;; scp or rsync DTRT. (progn (setq dirname (directory-file-name (expand-file-name dirname))