Tcl Source Code

Artifact 38990f385838619f01f4d138b7fd4d0bcca5e2be:

Attachment "clock-cygwin-8.4.1.patch" to ticket [656765ffff] added by pascalscheffers 2002-12-20 19:37:25.

---

--- tcl8.4.1/generic/tclClock.c	2002-07-08 20:19:31.000000000 +0200
+++ tcl8.4.1-fix/generic/tclClock.c	2002-12-20 13:09:57.000000000 +0100
@@ -307,7 +307,11 @@
 	}
         Tcl_SetVar2(interp, "env", "TZ", "GMT", TCL_GLOBAL_ONLY);
         savedTimeZone = timezone;
+#if !defined(__CYGWIN__)
         timezone = 0;
+#else 
+        _timezone = 0;
+#endif 
         tzset();
     }
 #endif
@@ -346,7 +350,11 @@
         } else {
             Tcl_UnsetVar2(interp, "env", "TZ", TCL_GLOBAL_ONLY);
         }
+#if !defined(__CYGWIN__)
         timezone = savedTimeZone;
+#else 
+        _timezone = savedTimeZone;
+#endif
         tzset();
     }
 #endif