# HG changeset patch
# User Michael Albinus <michael.albinus@gmx.de>
# Date 1238954861 0
# Node ID da220e3be8049a6e141b330edc1bb9b669686ede
# Parent  5cc9a4c776e866d60b1ba36d0d46b129191f4692
* net/tramp-fish.el (tramp-fish-do-copy-or-rename-file-directly):
Use `tramp-default-file-modes'.

diff -r 5cc9a4c776e8 -r da220e3be804 lisp/net/tramp-fish.el
--- 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.