]> git.eshelyaron.com Git - emacs.git/commitdiff
* net/tramp-fish.el (tramp-fish-do-copy-or-rename-file-directly):
authorMichael Albinus <michael.albinus@gmx.de>
Sun, 5 Apr 2009 18:07:41 +0000 (18:07 +0000)
committerMichael Albinus <michael.albinus@gmx.de>
Sun, 5 Apr 2009 18:07:41 +0000 (18:07 +0000)
Use `tramp-default-file-modes'.

lisp/net/tramp-fish.el

index f3dfcc8f547575163bc7f55184d5f06d200a17c4..2377432bdea8c697d7fbcf486362d822232358f3 100644 (file)
@@ -917,7 +917,7 @@ PRESERVE-UID-GID is completely ignored."
   (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.