From f367c7347bb0760fd15959e936de19ef78f6742d Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Fri, 29 Jun 2018 19:18:55 +0200
Subject: [PATCH] additional doc

---
 src/Handler/Corrections.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Handler/Corrections.hs b/src/Handler/Corrections.hs
index bc01e3051..d35909517 100644
--- a/src/Handler/Corrections.hs
+++ b/src/Handler/Corrections.hs
@@ -268,7 +268,7 @@ postCorrectionsR = do
         , colSubmissionLink
         ] -- Continue here
       psValidator = def
-        & restrictFilter (\name _ -> name /= "corrector")
+        & restrictFilter (\name _ -> name /= "corrector") -- We need to be careful to restrict allowed sorting/filter to not expose sensitive information
         & restrictSorting (\name _ -> name /= "corrector")
   correctionsR whereClause colonnade psValidator $ Map.fromList
     [ downloadAction