* net/tramp-sh.el (tramp-sh-handle-set-file-times): Set $UTC only

temporarily, via "env".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 15dd5d30654691f035bde800b200b5dcf76b7c35..9ecf7ebddd7ec0533881cc859cc4f5bda91b934e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-02-21  Michael Albinus  <michael.albinus@gmx.de>
+
+       * net/tramp-sh.el (tramp-sh-handle-set-file-times): Set $UTC only
+       temporarily, via "env".
+

 2013-02-21  Glenn Morris  <rgm@gnu.org>
 
        * info.el (Info-enable-edit): Remove.
 2013-02-21  Glenn Morris  <rgm@gnu.org>
 
        * info.el (Info-enable-edit): Remove.

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 7388c5708746e6f41e4b81fb1eb843e1b536e01f..82cbda5708627e05ba88a70a913e37c5b23665c1 100644 (file)
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -1410,7 +1410,7 @@ of."
              (utc (not (featurep 'xemacs))))
          (tramp-send-command-and-check
           v (format "%s touch -t %s %s"
              (utc (not (featurep 'xemacs))))
          (tramp-send-command-and-check
           v (format "%s touch -t %s %s"

-                    (if utc "TZ=UTC; export TZ;" "")
+                    (if utc "env TZ=UTC" "")

                     (if utc
                         (format-time-string "%Y%m%d%H%M.%S" time t)
                       (format-time-string "%Y%m%d%H%M.%S" time))
                     (if utc
                         (format-time-string "%Y%m%d%H%M.%S" time t)
                       (format-time-string "%Y%m%d%H%M.%S" time))