From 99b8a91bf70ec322d5fc8f3f446ec66f92b5f276 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Mon, 6 Apr 2015 11:24:50 +0900 Subject: TODO --- src/Utility/EventCache.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Utility/EventCache.hs b/src/Utility/EventCache.hs index 000a3cd..968e704 100644 --- a/src/Utility/EventCache.hs +++ b/src/Utility/EventCache.hs @@ -104,6 +104,7 @@ getTimetableReminders :: IO [Reminder] getTimetableReminders = do dayOfWeek <- map toLower . formatTime defaultTimeLocale "%A" . localDay . zonedTimeToLocalTime <$> getZonedTime + -- TODO: timetable CSV files shouldn't be in the cache directory as not reproducible dir <- SremConfig.getCacheDirectory let path = dir dayOfWeek ++ ".csv" exists <- doesFileExist path -- cgit v1.2.3