fix: remove manually inserted error for testing

This commit is contained in:
Gregor Kleen 2020-12-05 13:07:46 +01:00
parent f638027ea9
commit 8c17f3354a

View File

@ -157,7 +157,7 @@ getMaterialListR tid ssh csh = do
getMFileR :: TermId -> SchoolId -> CourseShorthand -> MaterialName -> FilePath -> Handler TypedContent
getMFileR tid ssh csh mnm title = error "MFileR" . serveOneFile $ fileQuery .| C.map entityVal
getMFileR tid ssh csh mnm title = serveOneFile $ fileQuery .| C.map entityVal
where
fileQuery = E.selectSource $ E.from $
\(course `E.InnerJoin` material `E.InnerJoin` matFile) -> do