fix(lms): correct lms table column sorting key

This commit is contained in:
Steffen Jost 2022-02-24 11:33:13 +01:00
parent e4c1afa2c9
commit 9ee476736c
2 changed files with 2 additions and 2 deletions

View File

@ -219,7 +219,7 @@ mkResultTable sid qsh qid = do
dbtExtraReps = []
resultDBTableValidator = def
& defaultSorting [SortAscBy "ident"]
& defaultSorting [SortAscBy csvResultIdent]
dbTable resultDBTableValidator resultDBTable
getLmsResultR, postLmsResultR :: SchoolId -> QualificationShorthand -> Handler Html

View File

@ -184,7 +184,7 @@ mkUserlistTable sid qsh qid = do
dbtExtraReps = []
userlistDBTableValidator = def
& defaultSorting [SortAscBy "ident"]
& defaultSorting [SortAscBy csvUserlistIdent]
dbTable userlistDBTableValidator userlistTable