Merge branch 'live' into 'master'

# Conflicts:
#   src/Handler/Utils/Submission.hs
This commit is contained in:
Gregor Kleen 2018-07-23 16:05:19 +02:00
commit 2ddc0a03cb

View File

@ -515,4 +515,4 @@ submissionMatchesSheet tid csh shn cid = do
shid <- fetchSheetId tid csh shn
Submission{..} <- get404 sid
when (shid /= submissionSheet) $ invalidArgsI [MsgSubmissionWrongSheet]
return sid
return sid