Merge branch 'master' into 740-labels
This commit is contained in:
commit
9013d8f0b5
@ -1023,7 +1023,7 @@ postCorrectionsR = do
|
||||
, colAssigned
|
||||
, colRating
|
||||
, colRated
|
||||
] -- Continue here
|
||||
]
|
||||
filterUI = Just $ mconcat
|
||||
[ filterUIPseudonym
|
||||
, filterUICourse courseOptions
|
||||
@ -1046,7 +1046,7 @@ postCorrectionsR = do
|
||||
psValidator = def
|
||||
& restrictCorrector
|
||||
& restrictAnonymous
|
||||
& defaultSorting [SortDescBy "ratingtime", SortAscBy "assignedtime" ]
|
||||
& defaultSorting [SortAscBy "assignedtime", SortDescBy "ratingtime"]
|
||||
& defaultFilter (singletonMap "israted" [toPathPiece False])
|
||||
|
||||
csvSettings = Just CorrectionTableCsvSettings
|
||||
|
||||
Reference in New Issue
Block a user