diff --git a/Handler/Login.hs b/Handler/Login.hs index 7fef18f..c24491f 100644 --- a/Handler/Login.hs +++ b/Handler/Login.hs @@ -32,7 +32,7 @@ postLoginR = do setMessage $ "Login error" redirect $ LoginR Nothing -> do - setMessage $ [shamlet|
User does not exist|] + setMessage "User does not exist" redirect $ LoginR loginForm :: Form Credentials diff --git a/templates/medium.hamlet b/templates/medium.hamlet index 81709b2..c748d9a 100644 --- a/templates/medium.hamlet +++ b/templates/medium.hamlet @@ -4,6 +4,6 @@- Uploaded on: #{formatTime defaultTimeLocale "%A %F %H:%M" (mediumTime medium)} + Uploaded on: #{formatTime defaultTimeLocale "%A %F %H:%M" (mediumTime medium)}
Description:
#{mediumDescription medium}