From 376c87de179c6bad7b00cb725d3f87b584840681 Mon Sep 17 00:00:00 2001 From: hylom Date: Wed, 31 May 2017 19:20:06 +0900 Subject: [PATCH] * Util::Timezones: fix to work --- src/newslash_web/lib/Newslash/Util/Timezones.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/newslash_web/lib/Newslash/Util/Timezones.pm b/src/newslash_web/lib/Newslash/Util/Timezones.pm index 93f0e255..fa6ebf05 100644 --- a/src/newslash_web/lib/Newslash/Util/Timezones.pm +++ b/src/newslash_web/lib/Newslash/Util/Timezones.pm @@ -13,7 +13,7 @@ our @EXPORT_OK = qw( ); -use constant TZCODE_HASH = { +use constant TZCODE_HASH => { ACST => [34200, "Central Australian", "Australia", "ACDT", 37800], AEST => [36000, "Eastern Australian", "Australia", "AEDT", 39600], AKST => [-32400, "Alaska", "America", "AKDT", -28800], @@ -28,7 +28,7 @@ use constant TZCODE_HASH = { EST => [-18000, "Eastern", "America", "EDT", -14400], GMT => [0, "Greenwich Mean", undef, undef, undef], GST => [-10800, "Greenland", undef, undef, undef], - HAST => [-36000, "Hawaii"-"Aleutian", "America", "HADT", -32400], + HAST => [-36000, "Hawaii-Aleutian", "America", "HADT", -32400], IDLE => [43200, "International Date Line East", undef, undef, undef], IDLW => [-43200, "International Date Line West", undef, undef, undef], IST => [19800, "Indian", undef, undef, undef], -- 2.11.0