diff options
Diffstat (limited to 'src/Utility/EventCache.hs')
-rw-r--r-- | src/Utility/EventCache.hs | 1 |
1 files changed, 1 insertions, 0 deletions
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 |