diff options
| author | sebres <sebres@users.sourceforge.net> | 2018-05-29 17:41:00 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2018-05-29 17:41:00 (GMT) |
| commit | 153e32d613b99001ad5c711314c0702372d1d273 (patch) | |
| tree | 846f167526951fe422e936161ad7d12655eb3a45 | |
| parent | 1b580435fc4b8af6b5f5980e20ad62b88d92b592 (diff) | |
| download | tcl-153e32d613b99001ad5c711314c0702372d1d273.zip tcl-153e32d613b99001ad5c711314c0702372d1d273.tar.gz tcl-153e32d613b99001ad5c711314c0702372d1d273.tar.bz2 | |
fixed ticket [dc69e5ecf04313429fd202b1906cd85bb7888f95]: missing zones AKST/AKDT
| -rw-r--r-- | generic/tclDate.c | 2 | ||||
| -rw-r--r-- | generic/tclGetDate.y | 2 | ||||
| -rw-r--r-- | library/clock.tcl | 2 |
3 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclDate.c b/generic/tclDate.c index 2cee47d..a48f5fa 100644 --- a/generic/tclDate.c +++ b/generic/tclDate.c @@ -2423,6 +2423,8 @@ static const TABLE TimezoneTable[] = { { "pdt", tDAYZONE, HOUR( 8) }, /* Pacific Daylight */ { "yst", tZONE, HOUR( 9) }, /* Yukon Standard */ { "ydt", tDAYZONE, HOUR( 9) }, /* Yukon Daylight */ + { "akst", tZONE, HOUR( 9) }, /* Alaska Standard */ + { "akdt", tDAYZONE, HOUR( 9) }, /* Alaska Daylight */ { "hst", tZONE, HOUR(10) }, /* Hawaii Standard */ { "hdt", tDAYZONE, HOUR(10) }, /* Hawaii Daylight */ { "cat", tZONE, HOUR(10) }, /* Central Alaska */ diff --git a/generic/tclGetDate.y b/generic/tclGetDate.y index 045b2cb..6aacf93 100644 --- a/generic/tclGetDate.y +++ b/generic/tclGetDate.y @@ -593,6 +593,8 @@ static const TABLE TimezoneTable[] = { { "pdt", tDAYZONE, HOUR( 8) }, /* Pacific Daylight */ { "yst", tZONE, HOUR( 9) }, /* Yukon Standard */ { "ydt", tDAYZONE, HOUR( 9) }, /* Yukon Daylight */ + { "akst", tZONE, HOUR( 9) }, /* Alaska Standard */ + { "akdt", tDAYZONE, HOUR( 9) }, /* Alaska Daylight */ { "hst", tZONE, HOUR(10) }, /* Hawaii Standard */ { "hdt", tDAYZONE, HOUR(10) }, /* Hawaii Daylight */ { "cat", tZONE, HOUR(10) }, /* Central Alaska */ diff --git a/library/clock.tcl b/library/clock.tcl index bd199a3..330c185 100644 --- a/library/clock.tcl +++ b/library/clock.tcl @@ -422,6 +422,8 @@ proc ::tcl::clock::Initialize {} { pdt -0700 \ yst -0900 \ ydt -0800 \ + akst -0900 \ + akdt -0800 \ hst -1000 \ hdt -0900 \ cat -1000 \ |