From df18a6bea3b65a0313db84f1f51fc43a4397dfbb Mon Sep 17 00:00:00 2001 From: Sarah Vaupel Date: Mon, 17 Aug 2020 11:08:10 +0200 Subject: [PATCH] Apply 1 suggestion(s) to 1 file(s) --- src/Handler/Exam/Correct.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Handler/Exam/Correct.hs b/src/Handler/Exam/Correct.hs index 2b915a76a..2a51d2e55 100644 --- a/src/Handler/Exam/Correct.hs +++ b/src/Handler/Exam/Correct.hs @@ -89,7 +89,7 @@ postECorrectR tid ssh csh examn = do E.||. user E.^. UserMatrikelnummer E.==. E.val mUserIdent E.||. user E.^. UserMatrikelnummer `E.hasInfix` E.val mUserIdent Nothing -> E.val False) - E.limit $ maxCountUserMatches+1 + E.limit $ succ maxCountUserMatches return user if