diff --git a/src/Utils/Sheet.hs b/src/Utils/Sheet.hs
index 93924d98d..ab6fa1bae 100644
--- a/src/Utils/Sheet.hs
+++ b/src/Utils/Sheet.hs
@@ -34,7 +34,7 @@ sheetOldUnassigned tid ssh csh = do
         E.&&. course E.^. CourseTerm      E.==. E.val tid
         E.&&. course E.^. CourseSchool    E.==. E.val ssh
         E.&&. course E.^. CourseShorthand E.==. E.val csh
-    E.where_ . E.exists . E.from $ \submission -> do
+    E.where_ . E.exists . E.from $ \submission ->
         E.where_ $ submission E.^. SubmissionSheet E.==. sheet E.^. SheetId
           E.&&.  E.isNothing (submission E.^. SubmissionRatingBy)
     E.orderBy [E.desc $ sheet E.^. SheetActiveTo]