microlens-mtl 0.1.4.0 → 0.1.4.1
raw patch · 3 files changed
+9/−5 lines, 3 filesdep ~microlensPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: microlens
API changes (from Hackage documentation)
- Lens.Micro.Mtl: magnify :: Magnify m n b a => ((b -> Magnified m c b) -> a -> Magnified m c a) -> m c -> n c
+ Lens.Micro.Mtl: magnify :: Magnify m n b a => LensLike' (Magnified m c) a b -> m c -> n c
- Lens.Micro.Mtl: zoom :: Zoom m n s t => ((s -> Zoomed m c s) -> t -> Zoomed m c t) -> m c -> n c
+ Lens.Micro.Mtl: zoom :: Zoom m n s t => LensLike' (Zoomed m c) t s -> m c -> n c
Files
- CHANGELOG.md +5/−1
- microlens-mtl.cabal +2/−2
- src/Lens/Micro/Mtl.hs +2/−2
CHANGELOG.md view
@@ -1,7 +1,11 @@+# 0.1.4.1++* Bumped microlens version.+ # 0.1.4.0 * Added `preview` (a synonym for (`^?`)).-* Bumped microlens version again.+* Bumped microlens version. # 0.1.3.1
microlens-mtl.cabal view
@@ -1,5 +1,5 @@ name: microlens-mtl-version: 0.1.4.0+version: 0.1.4.1 synopsis: microlens support for Reader/Writer/State from mtl description: This package contains functions (like 'view' or '+=') which work on 'MonadReader', 'MonadWriter', and 'MonadState' from the mtl package.@@ -27,7 +27,7 @@ other-modules: Lens.Micro.Mtl.Zoom -- other-extensions: build-depends: base >=4.5 && <5- , microlens >=0.2 && <0.4+ , microlens >=0.3.1 && <0.4 , mtl >=2.0.1 && <2.3 , transformers >=0.2 && <0.5 , transformers-compat >=0.4 && <1
src/Lens/Micro/Mtl.hs view
@@ -265,7 +265,7 @@ ... @ -}- zoom :: ((s -> Zoomed m c s) -> t -> Zoomed m c t) -> m c -> n c+ zoom :: LensLike' (Zoomed m c) t s -> m c -> n c instance Monad z => Zoom (Strict.StateT s z) (Strict.StateT t z) s t where zoom l (Strict.StateT m) = Strict.StateT $ unfocusing #. l (Focusing #. m)@@ -362,7 +362,7 @@ return (protocol ++ path) @ -}- magnify :: ((b -> Magnified m c b) -> a -> Magnified m c a) -> m c -> n c+ magnify :: LensLike' (Magnified m c) a b -> m c -> n c instance Monad m => Magnify (ReaderT b m) (ReaderT a m) b a where magnify l (ReaderT m) = ReaderT $ getEffect #. l (Effect #. m)