Fixed boolsToTType typo.
commit8b572aa9049fef7dc6dce49adc4db4e325133b0c
authorYitzchak Gale <gale@sefer.org>
dateSun 16 May 2010, 10:50 (16 years ago)
parenta84c7c6
Data/Time/LocalTime/TimeZone/Olson/Parse.hs+1−1
@@ -158,7 +158,7 @@ getOlsonPart getTime = do
158158 TtInfo gmtoff isdst ttype . takeWhile (/= '\NUL') . drop abbrind
159159 setTtype ttinfo ttype = ttinfo {tt_ttype = ttype}
160160 boolsToTType _ isgmt | isgmt = UTC
161− booslToTType isstd _ = maybe UnknownType stdOrWall isstd
161+ boolsToTType isstd _ = maybe UnknownType stdOrWall isstd
162162 stdOrWall isstd
163163 | isstd = Std
164164 | otherwise = Wall