Mercurial > emacs
diff lisp/net/tramp-fish.el @ 102852:da220e3be804
* net/tramp-fish.el (tramp-fish-do-copy-or-rename-file-directly):
Use `tramp-default-file-modes'.
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Sun, 05 Apr 2009 18:07:41 +0000 |
parents | a9dc0e7c3f2b |
children | bd92ac143136 |
line wrap: on
line diff
--- a/lisp/net/tramp-fish.el Sun Apr 05 18:06:55 2009 +0000 +++ b/lisp/net/tramp-fish.el Sun Apr 05 18:07:41 2009 +0000 @@ -917,7 +917,7 @@ (when (and keep-date (functionp 'set-file-times)) (set-file-times newname (nth 5 (file-attributes filename)))) ;; Set the mode. - (set-file-modes newname (file-modes filename))) + (set-file-modes newname (tramp-default-file-modes filename))) (defun tramp-fish-get-file-entries (vec localname list) "Read entries returned by FISH server.