diff --git a/src/Handler/Utils/Schedule.hs b/src/Utils/Schedule.hs similarity index 97% rename from src/Handler/Utils/Schedule.hs rename to src/Utils/Schedule.hs index 1108d9590..ef642b980 100644 --- a/src/Handler/Utils/Schedule.hs +++ b/src/Utils/Schedule.hs @@ -1,4 +1,4 @@ -module Handler.Utils.Schedule +module Utils.Schedule ( fetchActiveTerms, fetchCourseEvents, fetchTutorials, fetchExamOccurrences ) where @@ -10,7 +10,7 @@ import qualified Database.Esqueleto.Utils as E import Utils.Course import Utils.Tutorial -import Handler.Utils.Schedule.Types +import Utils.Schedule.Types fetchActiveTerms :: MonadHandler m => ReaderT SqlBackend m [E.Value TermId]