refactor(sheets): remove obsolete form validation TODOs

This commit is contained in:
Sarah Vaupel 2021-06-19 12:58:55 +02:00 committed by Gregor Kleen
parent 7192cb527c
commit 09a1c829bd

View File

@ -185,10 +185,6 @@ makeSheetForm cId msId template = identifyForm FIDsheet . validateForm validateS
$ classifySubmissionMode sfSubmissionMode /= SubmissionModeNone
|| sfType == NotGraded
-- TODO: do authorship statement validation
-- TODO: if school mode is none or required for this sheet (exam-related/exam-umrelated?), statement must be set accordingly (Just for required, Nothing for none)
-- TODO: if school prevents custom statements, statement must match current school statement
correctorForm :: Loads -> AForm Handler Loads
correctorForm loads' = wFormToAForm $ do
currentRoute <- fromMaybe (error "correctorForm called from 404-handler") <$> liftHandler getCurrentRoute