Merge pull request #1812 from jezen/master
Fix SubSub compilation for GHC >= 9.0.1
This commit is contained in:
commit
7a10dd3628
@ -1,5 +1,9 @@
|
|||||||
# ChangeLog for yesod-core
|
# ChangeLog for yesod-core
|
||||||
|
|
||||||
|
## 1.6.24.4
|
||||||
|
|
||||||
|
* Fix test-suite compilation error for GHC >= 9.0.1 [#1812](https://github.com/yesodweb/yesod/pull/1812)
|
||||||
|
|
||||||
## 1.6.24.3
|
## 1.6.24.3
|
||||||
|
|
||||||
* Fix subsite-to-subsite dispatch [#1805](https://github.com/yesodweb/yesod/pull/1805)
|
* Fix subsite-to-subsite dispatch [#1805](https://github.com/yesodweb/yesod/pull/1805)
|
||||||
|
|||||||
@ -18,6 +18,10 @@ import YesodCoreTest.SubSubData
|
|||||||
|
|
||||||
data App = App { getOuter :: OuterSubSite }
|
data App = App { getOuter :: OuterSubSite }
|
||||||
|
|
||||||
|
mkYesod "App" [parseRoutes|
|
||||||
|
/ OuterSubSiteR OuterSubSite getOuter
|
||||||
|
|]
|
||||||
|
|
||||||
instance Yesod App
|
instance Yesod App
|
||||||
|
|
||||||
getSubR :: SubHandlerFor InnerSubSite master T.Text
|
getSubR :: SubHandlerFor InnerSubSite master T.Text
|
||||||
@ -29,10 +33,6 @@ instance YesodSubDispatch OuterSubSite master where
|
|||||||
instance YesodSubDispatch InnerSubSite master where
|
instance YesodSubDispatch InnerSubSite master where
|
||||||
yesodSubDispatch = $(mkYesodSubDispatch resourcesInnerSubSite)
|
yesodSubDispatch = $(mkYesodSubDispatch resourcesInnerSubSite)
|
||||||
|
|
||||||
mkYesod "App" [parseRoutes|
|
|
||||||
/ OuterSubSiteR OuterSubSite getOuter
|
|
||||||
|]
|
|
||||||
|
|
||||||
app :: App
|
app :: App
|
||||||
app = App { getOuter = OuterSubSite { getInner = InnerSubSite }}
|
app = App { getOuter = OuterSubSite { getInner = InnerSubSite }}
|
||||||
|
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
name: yesod-core
|
name: yesod-core
|
||||||
version: 1.6.24.3
|
version: 1.6.24.4
|
||||||
license: MIT
|
license: MIT
|
||||||
license-file: LICENSE
|
license-file: LICENSE
|
||||||
author: Michael Snoyman <michael@snoyman.com>
|
author: Michael Snoyman <michael@snoyman.com>
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user