diff --git a/src/Handler/Sheet.hs b/src/Handler/Sheet.hs index 1335a25d0..c46a95095 100644 --- a/src/Handler/Sheet.hs +++ b/src/Handler/Sheet.hs @@ -134,17 +134,7 @@ makeSheetForm msId template = identForm FIDsheet $ \html -> do FormSuccess sheetResult | errorMsgs <- validateSheet mr sheetResult , not $ null errorMsgs -> - (FormFailure errorMsgs, - [whamlet| -