diff options
| -rw-r--r-- | tests/date/Test.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/date/Test.pm b/tests/date/Test.pm index 34c9641b2..de13ec290 100644 --- a/tests/date/Test.pm +++ b/tests/date/Test.pm @@ -113,6 +113,9 @@ sub test_vector ['risks-1', "-d 'Nov 10 1996' $fmt", {}, "1996-11-10 00:00:00", 0], + ['regress-1', "-u -d '1996-11-10 0:00:00 +0' $fmt", {}, + "1996-11-10 00:00:00", 0], + # FIXME: add a lot more... ); @@ -127,6 +130,10 @@ sub test_vector $Test::env{'utc-0'} = ['TZ=UTC+4']; + # This one would pass if TZ (with any, or even no, value) were in + # the environment. + $Test::env{'regress-1'} = ['LANG=C']; + $Test::env{'utc-1'} = ['TZ=UTC+1']; $Test::input_via{'utc-1'} = {REDIR => 0}; $Test::input_via{'utc-1a'} = {REDIR => 0}; |