diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-10-18 17:41:19 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-10-18 17:41:19 +0100 |
| commit | 28c3d5f4a254cce07b783305aa5f3a842a9aecbc (patch) | |
| tree | 74c6bd12c497017b23970e2b1f2951d1708e4e73 /ext | |
| parent | 6609e0408cfa30e0d5c739e4c818f8591c88c0bc (diff) | |
| download | perl-28c3d5f4a254cce07b783305aa5f3a842a9aecbc.tar.gz | |
Use gmtime() instead of localtime(), as timezones hinder testing strtime().
(Specifically negative timezones on operating systems without tzset(). Coming
from Washington State, you would have thought that they would have thought of
this.)
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/POSIX/t/time.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/POSIX/t/time.t b/ext/POSIX/t/time.t index c349646655..01ce87fa8e 100644 --- a/ext/POSIX/t/time.t +++ b/ext/POSIX/t/time.t @@ -39,7 +39,7 @@ my $orig_loc = setlocale(LC_TIME, "C") || die "Cannot setlocale() to C: $!"; my $jan_16 = 15 * 86400; is(ctime($jan_16), strftime("%a %b %d %H:%M:%S %Y\n", localtime($jan_16)), "get ctime() equal to strftime()"); -is(strftime("%Y\x{5e74}%m\x{6708}%d\x{65e5}", localtime($jan_16)), +is(strftime("%Y\x{5e74}%m\x{6708}%d\x{65e5}", gmtime($jan_16)), "1970\x{5e74}01\x{6708}16\x{65e5}", "strftime() can handle unicode chars in the format string"); |