@@ -69,9 +69,9 @@ timeZoneSeriesToOlson (TimeZoneSeries dflt pairs)
6969 | otherwise = Just $
7070 OlsonData
7171 [Transition secs ttinfo |
72− (t, tzs) <- reverse pairs,
72+ (t, tz) <- reverse pairs,
7373 let secs = round $ utcTimeToPOSIXSeconds t,
74− ttinfo <- maybeToList $ lookup (mkTT tzs) ttAssocs]
74+ ttinfo <- maybeToList $ lookup (mkTT tz) ttAssocs]
7575 ttinfos
7676 []
7777 Nothing