currentLocalTime :: IO LocalTime
currentLocalTime = utcToLocalTime <$> getCurrentTimeZone <*> getCurrentTime
currentLocalTime :: IO LocalTime
currentLocalTime = utcToLocalTime <$> getCurrentTimeZone <*> getCurrentTime
currentLocalTime = utcToLocalTime <$> getCurrentTimeZone <*> getCurrentTime