summaryrefslogtreecommitdiffstats
path: root/tests/clock.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/clock.test')
-rw-r--r--tests/clock.test12
1 files changed, 11 insertions, 1 deletions
diff --git a/tests/clock.test b/tests/clock.test
index 0f1e9da..39f9142 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.91 2009/06/09 13:52:38 kennykb Exp $
+# RCS: @(#) $Id: clock.test,v 1.92 2009/10/24 22:20:10 kennykb Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2
@@ -36140,6 +36140,16 @@ test clock-52.3 {correct conversion of times in Russia} {
set result
} {01:59:59 03:00:00 02:59:59 02:00:00}
+test clock-52.4 {correct conversion of times in USA} {
+ # [Bug 2207436]
+ set result {}
+ foreach t [list 1268549999 1268550000 1257055199 1257055200] {
+ lappend result [clock format $t -format %H:%M:%S \
+ -timezone EST5EDT]
+ }
+ set result
+} {01:59:59 03:00:00 01:59:59 01:00:00}
+
# Regression test for Bug # 1505383
test clock-53.1 {%EC %Ey} {