fraport/fradrive-old
fraport/fradrive-old
Archived
3
1
Fork 0
Code Issues 65 Pull Requests 5 Actions Packages Projects Releases 197 Wiki Activity

minor comment added

Browse Source
This commit is contained in:
SJost 2018-04-19 09:29:16 +02:00
parent 18f33290bb
commit cdf2cec832
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Submission.hs
View File

@ -58,7 +58,7 @@ makeSubmissionForm unpackZips grouping = identForm FIDsubmission $ \html -> do
<* submitButton <* submitButton
where where
groupNr groupNr
| Arbitrary{..} <- grouping = pred maxParticipants | Arbitrary{..} <- grouping = pred maxParticipants -- pred to account for the person submitting
| otherwise = 0 | otherwise = 0
getSubmissionR, postSubmissionR :: TermId -> Text -> Text -> SubmissionMode -> Handler Html getSubmissionR, postSubmissionR :: TermId -> Text -> Text -> SubmissionMode -> Handler Html