# HG changeset patch # User Michael Albinus # Date 1246308077 0 # Node ID 2cc306c7ad911ade496403c938ec11d89e57bac6 # Parent 23b69c963c1d31f70443f51d639a211b5db9867a * net/tramp.el (tramp-do-copy-or-rename-file-directly): Set file modes mandatory. (Bug#3712) diff -r 23b69c963c1d -r 2cc306c7ad91 lisp/net/tramp.el --- a/lisp/net/tramp.el Mon Jun 29 14:44:04 2009 +0000 +++ b/lisp/net/tramp.el Mon Jun 29 20:41:17 2009 +0000 @@ -3362,9 +3362,8 @@ (error))))))))) ;; Set the time and mode. Mask possible errors. - ;; Won't be applied for 'rename. (condition-case nil - (when (and keep-date (not preserve-uid-gid)) + (when keep-date (set-file-times newname (nth 5 (file-attributes filename))) (set-file-modes newname (tramp-default-file-modes filename))) (error)))))