From 803d8b30df9d8764dd515476f942c0e08e1da1f6 Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <sarah.vaupel@ifi.lmu.de>
Date: Tue, 1 Feb 2022 17:27:30 +0100
Subject: [PATCH] fix(subs): primarily order subs list by assigned time

---
 src/Handler/Submission/List.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Handler/Submission/List.hs b/src/Handler/Submission/List.hs
index d9976e95c..66d1c11b0 100644
--- a/src/Handler/Submission/List.hs
+++ b/src/Handler/Submission/List.hs
@@ -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