diff options
| author | kennykb <kennykb@noemail.net> | 2009-10-27 03:23:31 (GMT) |
|---|---|---|
| committer | kennykb <kennykb@noemail.net> | 2009-10-27 03:23:31 (GMT) |
| commit | 5d5e6be839822db043b368919f007f4e8ef1edd7 (patch) | |
| tree | 14e60f6e093b66a12c85ca2f25b09a2bf38462ae /tests/clock.test | |
| parent | 0ff3198cc832fb793ff8f6a9a572ecddb1d1e4aa (diff) | |
| download | tcl-5d5e6be839822db043b368919f007f4e8ef1edd7.zip tcl-5d5e6be839822db043b368919f007f4e8ef1edd7.tar.gz tcl-5d5e6be839822db043b368919f007f4e8ef1edd7.tar.bz2 | |
* library/clock.tcl (ParseClockScanFormat):
Corrected a problem where [clock scan] didn't load the timezone
soon enough when processing a time format that lacked a complete
date. [Bug 2886852]
* tests/clock.test (clock-66.1):
Added a test case for the above bug.
FossilOrigin-Name: 1042002083374bb352716c4db6797a06e30edb3f
Diffstat (limited to 'tests/clock.test')
| -rw-r--r-- | tests/clock.test | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/tests/clock.test b/tests/clock.test index 39f9142..51d5655 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.92 2009/10/24 22:20:10 kennykb Exp $ +# RCS: @(#) $Id: clock.test,v 1.93 2009/10/27 03:23:32 kennykb Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 @@ -36733,6 +36733,19 @@ test clock-65.1 {clock add, bad option [Bug 2481670]} {*}{ -result {bad switch "-foo"*} } +test clock-66.1 {clock scan, no date, never-before-seen timezone} {*}{ + -setup { + ::tcl::clock::ClearCaches + } + -body { + clock scan 1200 \ + -timezone {<EST>+05:00:00<EDT>+04:00:00,M3.2.0/02:00:00,M11.1.0/02:00:00} \ + -base 1256529600 \ + -format %H%M + } + -result 1256572800 +} + # cleanup namespace delete ::testClock |