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

Bugfix sheetOldUnassigned

Browse Source
This commit is contained in:
SJost 2019-01-30 11:30:54 +01:00
parent 2e9320886f
commit b45d1c92f9
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/Utils/Sheet.hs
View File

@ -37,7 +37,7 @@ sheetOldUnassigned tid ssh csh = do
E.where_ . E.exists . E.from $ \submission -> E.where_ . E.exists . E.from $ \submission ->
E.where_ $ submission E.^. SubmissionSheet E.==. sheet E.^. SheetId E.where_ $ submission E.^. SubmissionSheet E.==. sheet E.^. SheetId
E.&&. E.isNothing (submission E.^. SubmissionRatingBy) E.&&. E.isNothing (submission E.^. SubmissionRatingBy)
E.orderBy [E.desc $ sheet E.^. SheetActiveTo] E.orderBy [E.asc $ sheet E.^. SheetActiveTo]
E.limit 1 E.limit 1
return $ sheet E.^. SheetName return $ sheet E.^. SheetName
return $ case sheets of return $ case sheets of