yesod-core 1.6.10 → 1.6.10.1
raw patch · 3 files changed
+13/−3 lines, 3 files
Files
- ChangeLog.md +4/−0
- test/YesodCoreTest/Cache.hs +8/−2
- yesod-core.cabal +1/−1
ChangeLog.md view
@@ -1,5 +1,9 @@ # ChangeLog for yesod-core +## 1.6.10.1++* Fix test suite compilation for [commercialhaskell/stackage#4319](https://github.com/commercialhaskell/stackage/issues/4319)+ ## 1.6.10 * Adds functions to get and set values in the per-request caches. [#1573](https://github.com/yesodweb/yesod/pull/1573)
test/YesodCoreTest/Cache.hs view
@@ -47,7 +47,10 @@ V2 v2b <- cached $ atomicModifyIORef ref $ \i -> (i + 1, V2 $ i + 1) cacheBySet "3" (V2 3)- Just (V2 v3a) <- cacheByGet "3"+ V2 v3a <- cacheByGet "3" >>= \x ->+ case x of+ Just y -> return y+ Nothing -> error "must be Just" V2 v3b <- cachedBy "3" $ (pure $ V2 4) return $ RepPlain $ toContent $ show [v1a, v1b, v2a, v2b, v3a, v3b]@@ -66,7 +69,10 @@ cacheBySet "4" (V2 4)- Just (V2 v4a) <- cacheByGet "4"+ V2 v4a <- cacheByGet "4" >>= \x ->+ case x of+ Just y -> return y+ Nothing -> error "must be Just" V2 v4b <- cachedBy "4" $ (pure $ V2 5) return $ RepPlain $ toContent $ show [v1a, v1b, v2a, v2b, v3a, v3b, v4a, v4b]
yesod-core.cabal view
@@ -1,5 +1,5 @@ name: yesod-core-version: 1.6.10+version: 1.6.10.1 license: MIT license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>