Merge branch 'live' into 'master'
# Conflicts: # src/Handler/Utils/Submission.hs
This commit is contained in:
commit
2ddc0a03cb
@ -515,4 +515,4 @@ submissionMatchesSheet tid csh shn cid = do
|
|||||||
shid <- fetchSheetId tid csh shn
|
shid <- fetchSheetId tid csh shn
|
||||||
Submission{..} <- get404 sid
|
Submission{..} <- get404 sid
|
||||||
when (shid /= submissionSheet) $ invalidArgsI [MsgSubmissionWrongSheet]
|
when (shid /= submissionSheet) $ invalidArgsI [MsgSubmissionWrongSheet]
|
||||||
return sid
|
return sid
|
||||||
Loading…
Reference in New Issue
Block a user