diff --git a/ChangeLog.md b/ChangeLog.md --- a/ChangeLog.md +++ b/ChangeLog.md @@ -1,5 +1,9 @@ # ChangeLog for yesod-core +## 1.6.23.1 + +* Fix typo in creation of the description `` tag in `defaultLayout`. [#1766](https://github.com/yesodweb/yesod/pull/1766) + ## 1.6.23 * Add idempotent versions of `setDescription`, `setDescriptionI`. These functions diff --git a/src/Yesod/Core/Class/Yesod.hs b/src/Yesod/Core/Class/Yesod.hs --- a/src/Yesod/Core/Class/Yesod.hs +++ b/src/Yesod/Core/Class/Yesod.hs @@ -88,7 +88,7 @@ #{pageTitle p} $maybe description <- pageDescription p - <meta type="description" content="#{description}"> + <meta name="description" content="#{description}"> ^{pageHead p} <body> $forall (status, msg) <- msgs diff --git a/test/YesodCoreTest/Meta.hs b/test/YesodCoreTest/Meta.hs --- a/test/YesodCoreTest/Meta.hs +++ b/test/YesodCoreTest/Meta.hs @@ -48,7 +48,7 @@ res <- request defaultRequest { pathInfo = ["desc"] } - assertBody "<!DOCTYPE html>\n<html><head><title>" res + assertBody "\n" res runner :: Session () -> IO () runner f = toWaiAppPlain App >>= runSession f diff --git a/yesod-core.cabal b/yesod-core.cabal --- a/yesod-core.cabal +++ b/yesod-core.cabal @@ -1,5 +1,5 @@ name: yesod-core -version: 1.6.23 +version: 1.6.23.1 license: MIT license-file: LICENSE author: Michael Snoyman