diff --git a/src/Handler/Exam/Correct.hs b/src/Handler/Exam/Correct.hs
index a14a839b3..21baa4b8c 100644
--- a/src/Handler/Exam/Correct.hs
+++ b/src/Handler/Exam/Correct.hs
@@ -21,9 +21,6 @@ import Utils.Exam
 minNeedleLength :: Int
 minNeedleLength = 3
 
--- TODO use according to description
--- TODO maybe renders minNeedleLength unnecessary?
--- TODO maybe also perform user and ldap lookups if there are fewer results than this number? (TODO add user as exam participant if not already participant)
 -- | Maximum number of participant matches to show. Also serves as an upper limit to the number of query results from participant lookups.
 maxCountUserMatches :: Integral a => a
 maxCountUserMatches = 10
diff --git a/src/Handler/ExternalExam/Correct.hs b/src/Handler/ExternalExam/Correct.hs
index 729265437..bb976baaa 100644
--- a/src/Handler/ExternalExam/Correct.hs
+++ b/src/Handler/ExternalExam/Correct.hs
@@ -20,8 +20,6 @@ import Utils.Exam
 minNeedleLength :: Int
 minNeedleLength = 3  -- TODO rethink
 
--- TODO use according to description
--- TODO maybe renders minNeedleLength unnecessary?
 -- | Maximum number of user matches to show. Also serves as an upper limit to the number of query results from user and/or ldap lookups.
 maxCountUserMatches :: Integral a => a
 maxCountUserMatches = 10
@@ -53,8 +51,7 @@ getEECorrectR tid ssh coursen examn = do
 
   siteLayoutMsg heading $ do
     setTitleI heading
-    let
-      examCorrectExplanation = $(i18nWidgetFile "external-exam-correct-explanation")
+    let examCorrectExplanation = $(i18nWidgetFile "external-exam-correct-explanation")
     $(widgetFile "exam-correct")