diff --git a/src/Handler/Corrections.hs b/src/Handler/Corrections.hs
index 851c1b1c4..43a8bbed7 100644
--- a/src/Handler/Corrections.hs
+++ b/src/Handler/Corrections.hs
@@ -1218,8 +1218,8 @@ assignHandler tid ssh csh cid assignSids = do
       getCorrector (Just uid)
         | Just (User{..},loadMap) <- Map.lookup uid correctorMap
         = (nameEmailWidget userEmail userDisplayName userSurname, loadMap)
-        -- | Just (User{..} ) <- Map.lookup uid lecturerNames
-        -- = (nameEmailWidget userEmail userDisplayName userSurname, mempty)  -- lecturers may also correct in rare cases
+        --  |  Just (User{..} ) <- Map.lookup uid lecturerNames
+        --  = (nameEmailWidget userEmail userDisplayName userSurname, mempty)  -- lecturers may also correct in rare cases
       getCorrector _ = ([whamlet|_{MsgNoCorrectorAssigned}|], mempty)
       -- avoid nestes hamlet $maybe with duplicated $nothing
       getCorrSheetStatus :: Maybe UserId -> SheetName -> Maybe CorrectionInfo