From: Artur Bergman <sky@nanisky.com>
Date: Fri, 21 Sep 2001 10:33:34 +0000 (+0000)
Subject: Fixed bug where Time::HiRes::time returned time adjusted to
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=408dc35d26ca372a9b20cc32e609ae2e4c6bbe94;p=p5sagit%2Fp5-mst-13.2.git

Fixed bug where Time::HiRes::time returned time adjusted to
timezone! GetSystemTime should be available on all Win32
platforms we support. Perhaps Time::HiRes should be extended to
support WinCE and Novell?

p4raw-id: //depot/perl@12105
---

diff --git a/ext/Time/HiRes/HiRes.xs b/ext/Time/HiRes/HiRes.xs
index 4087455..97ea559 100644
--- a/ext/Time/HiRes/HiRes.xs
+++ b/ext/Time/HiRes/HiRes.xs
@@ -70,7 +70,7 @@ gettimeofday (struct timeval *tp, int nothing)
  time_t tt;
  struct tm tmtm;
  /* mktime converts local to UTC */
- GetLocalTime (&st);
+ GetSystemTime (&st);
  tmtm.tm_sec = st.wSecond;
  tmtm.tm_min = st.wMinute;
  tmtm.tm_hour = st.wHour;