fix(allocation-list): fix default sorting

2019-12-06 17:32:41 +01:00 · 2019-12-06 17:32:41 +01:00 · 9eff3cfa10
commit 9eff3cfa10
parent 0b56ecc6ec
1 changed files with 1 additions and 1 deletions
--- a/src/Handler/Allocation/List.hs
+++ b/src/Handler/Allocation/List.hs
@ -124,7 +124,7 @@ getAllocationListR = do

    psValidator :: PSValidator _ _
    psValidator = def
-      & defaultSorting [SortDescBy "term", SortAscBy "school", SortAscBy "allocation"]
+      & defaultSorting [SortDescBy "term", SortAscBy "school-short", SortAscBy "allocation"]

  table <- runDB $ dbTableWidget' psValidator DBTable{..}