envy-extensible 0.2.0.0 → 0.2.0.1
raw patch · 2 files changed
+10/−21 lines, 2 filesdep ~envyPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: envy
API changes (from Hackage documentation)
- Data.Extensible.Envy: instance System.Envy.Var a => System.Envy.Var (Data.Functor.Identity.Identity a)
Files
- envy-extensible.cabal +2/−2
- src/Data/Extensible/Envy.hs +8/−19
envy-extensible.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.2 name: envy-extensible-version: 0.2.0.0+version: 0.2.0.1 synopsis: Provides FromEnv in envy instance for Record of extensible. -- description: homepage: https://github.com/igrep/envy-extensible#readme@@ -17,7 +17,7 @@ default-language: Haskell2010 build-depends: , base >= 4.7 && < 5 , extensible >= 0.6- , envy >= 2.0+ , envy >= 2.1 library import: shared
src/Data/Extensible/Envy.hs view
@@ -30,15 +30,14 @@ ) where -import Control.Applicative ((<|>))-import qualified Data.Char as C-import Data.Extensible (Forall, Instance1)-import qualified Data.Extensible as Ex-import Data.Functor.Identity (Identity (Identity), runIdentity)-import Data.Kind (Type)-import Data.Proxy (Proxy (Proxy))-import GHC.TypeLits (KnownSymbol, Symbol)-import qualified System.Envy as Env+import Control.Applicative ((<|>))+import qualified Data.Char as C+import Data.Extensible (Forall, Instance1)+import qualified Data.Extensible as Ex+import Data.Kind (Type)+import Data.Proxy (Proxy (Proxy))+import GHC.TypeLits (KnownSymbol, Symbol)+import qualified System.Envy as Env -- | Function to convert field labels of 'Ex.Record' into the@@ -117,13 +116,3 @@ ( Ex.Field <$> Env.env (fl2en $ Ex.stringKeyOf membership) ) <|> pure (Ex.hlookup membership def) {-# INLINE recordFromEnvWithDefault #-}----- | Necessary to make a 'Env.Parser' for 'Ex.Record'.------ TODO: Remove this after <https://github.com/dmjio/envy/pull/31> is released.-instance Env.Var a => Env.Var (Identity a) where- toVar = Env.toVar . runIdentity- {-# INLINE toVar #-}- fromVar = fmap Identity . Env.fromVar- {-# INLINE fromVar #-}