From 621a5a5d61b725fde1701f81e919f1a2af89cab2 Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Wed, 22 Dec 1999 11:15:15 +0000 Subject: (regress-1): New test for the above. --- tests/date/Test.pm | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'tests') 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}; -- cgit v1.2.3-70-g09d2