Attachment "let-DST-include-year-2099.patch" to
ticket [34538ba43f]
added by
anonymous
2013-06-20 08:14:04.
From f10135df3f4751d7c83a66561c988ae799b6372f Mon Sep 17 00:00:00 2001
From: "Song.Li" <[email protected]>
Date: Fri, 10 Aug 2012 13:07:20 +0800
Subject: [PATCH] let DST include year 2099
tcl puts Daylight Saving Time in deffect from 1916 to 2099,
it should include the year 2099,becuase tcl
self-contained testing have a DST testcase on 2099.
so the condition statement "<2099" should be "<=2099"
Upstream-Status: Pending
Signed-off-by: Song.Li <[email protected]>
---
library/clock.tcl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/library/clock.tcl b/library/clock.tcl
index 2e9cae7..e8efe4a 100644
--- a/library/clock.tcl
+++ b/library/clock.tcl
@@ -3945,7 +3945,7 @@ proc ::tcl::clock::ProcessPosixTimeZone { z } {
# Put DST in effect in all years from 1916 to 2099.
- for { set y 1916 } { $y < 2099 } { incr y } {
+ for { set y 1916 } { $y <= 2099 } { incr y } {
set startTime [DeterminePosixDSTTime $z start $y]
incr startTime [expr { - wide($stdOffset) }]
set endTime [DeterminePosixDSTTime $z end $y]
--
1.7.9.5
