diff --git a/app/Main.hs b/app/Main.hs index 918efb0..185ae15 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -101,7 +101,7 @@ postUploadR = do defaultLayout [whamlet|
#{List.length points} points - thanks!|] Left _ -> defaultLayout - [whamlet|
parse error ] + [whamlet|
parse error |] FormMissing -> defaultLayout [whamlet|
FormMissing (?)|] FormFailure errors ->