diff options
| -rw-r--r-- | ChangeLog | 4 | ||||
| -rw-r--r-- | tests/clock.test | 6 |
2 files changed, 7 insertions, 3 deletions
@@ -13,6 +13,10 @@ user 'nyademo' for pointing this out and developing a fix. * generic/tclPathObj.c: Corrected a 'const'ness fault that caused bitter complaints from MSVC. + * tests/clock.test (clock-40.1, clock-58.1): Corrected a + test case that depended on ":localtime" being able to handle + dates prior to the Posix epoch, [Bug 1618445] Added a test + case for the dates of the Japanese emperors. [Bug 1637471] 2007-04-19 Donal K. Fellows <donal.k.fellows@manchester.ac.uk> diff --git a/tests/clock.test b/tests/clock.test index b3ffa9c..0aa65b6 100644 --- a/tests/clock.test +++ b/tests/clock.test @@ -11,7 +11,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: clock.test,v 1.75 2007/04/20 02:23:34 kennykb Exp $ +# RCS: @(#) $Id: clock.test,v 1.76 2007/04/20 02:46:32 kennykb Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 @@ -35862,7 +35862,7 @@ test clock-40.1 {regression - bad month with -timezone :localtime} \ set env(TZ) UTC0 } \ -body { - clock scan 1970-01-01T00:00:00 -timezone :localtime \ + clock scan 2000-01-01T00:00:00 -timezone :localtime \ -format %Y-%m-%dT%H:%M:%S } \ -cleanup { @@ -35873,7 +35873,7 @@ test clock-40.1 {regression - bad month with -timezone :localtime} \ unset env(TZ) } } \ - -result {0} + -result 946684800 test clock-41.1 {regression test - format group %k when hour is 0 } { clock format 0 -format %k -gmt true |