diff --git a/yesod-core/Yesod/Internal/Core.hs b/yesod-core/Yesod/Internal/Core.hs index e34ad92a..0beb568b 100644 --- a/yesod-core/Yesod/Internal/Core.hs +++ b/yesod-core/Yesod/Internal/Core.hs @@ -162,7 +162,7 @@ class RenderRoute a => Yesod a where p <- widgetToPageContent w mmsg <- getMessage hamletToRepHtml [hamlet| -doctype 5 +$doctype 5 diff --git a/yesod-core/test/YesodCoreTest/ErrorHandling.hs b/yesod-core/test/YesodCoreTest/ErrorHandling.hs index 703fb1c3..64a978f8 100644 --- a/yesod-core/test/YesodCoreTest/ErrorHandling.hs +++ b/yesod-core/test/YesodCoreTest/ErrorHandling.hs @@ -25,7 +25,7 @@ instance Yesod App getHomeR :: Handler RepHtml getHomeR = defaultLayout $ toWidget [hamlet| -doctype 5 +$doctype 5