base64-lens 0.1.0.0 → 0.1.0.1
raw patch · 4 files changed
+21/−20 lines, 4 filesdep ~textPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: text
API changes (from Hackage documentation)
Files
- README.md +1/−0
- base64-lens.cabal +4/−4
- src/Data/ByteString/Base64/Lens.hs +4/−4
- src/Data/Text/Encoding/Base64/Lens.hs +12/−12
README.md view
@@ -1,6 +1,7 @@ # Base64-lens [](https://travis-ci.com/emilypi/base64-lens)+[](https://hackage.haskell.org/package/base64-lens) This package provides optics and convenient pattern synonyms for the [base64](https://hackage.haskell.org/package/base64) library.
base64-lens.cabal view
@@ -1,7 +1,7 @@ cabal-version: 1.24 name: base64-lens-version: 0.1.0.0+version: 0.1.0.1 synopsis: Optics for the Base64 library description: Prisms and pattern synonyms for the Base64 library@@ -37,10 +37,10 @@ , Data.Text.Encoding.Base64.Lens build-depends: base >=4.10 && <5- , base64 >=0.2.0.0+ , base64 >=0.2 && <0.3 , bytestring >=0.10 && <0.11- , lens >=4.0 && <4.19- , text >=1.2 && <1.3+ , lens >=4.0 && <4.19+ , text hs-source-dirs: src default-language: Haskell2010
src/Data/ByteString/Base64/Lens.hs view
@@ -113,25 +113,25 @@ -- -------------------------------------------------------------------------- -- -- Patterns --- | Unidirectional pattern synonym for base64-encoded 'ByteString' values.+-- | Bidirectional pattern synonym for base64-encoded 'ByteString' values. -- pattern Base64 :: ByteString -> ByteString pattern Base64 a <- (preview _Base64 -> Just a) where Base64 a = _Base64 # a --- | Unidirectional pattern synonym for base64url-encoded 'ByteString' values.+-- | Bidirectional pattern synonym for base64url-encoded 'ByteString' values. -- pattern Base64Url :: ByteString -> ByteString pattern Base64Url a <- (preview _Base64Url -> Just a) where Base64Url a = _Base64Url # a --- | Unidirectional pattern synonym for unpadded base64-encoded 'ByteString' values.+-- | Bidirectional pattern synonym for unpadded base64-encoded 'ByteString' values. -- pattern Base64Unpadded :: ByteString -> ByteString pattern Base64Unpadded a <- (preview _Base64Unpadded -> Just a) where Base64Unpadded a = _Base64Unpadded # a --- | Unidirectional pattern synonym for unpadded base64url-encoded 'ByteString' values.+-- | Bidirectional pattern synonym for unpadded base64url-encoded 'ByteString' values. -- pattern Base64UrlUnpadded :: ByteString -> ByteString pattern Base64UrlUnpadded a <- (preview _Base64UrlUnpadded -> Just a) where
src/Data/Text/Encoding/Base64/Lens.hs view
@@ -112,26 +112,26 @@ -- -------------------------------------------------------------------------- -- -- Patterns --- | Unidirectional pattern synonym for base64-encoded 'Text' values.+-- | Bidirectional pattern synonym for base64-encoded 'Text' values. -- pattern Base64 :: Text -> Text-pattern Base64 a <- (preview _Base64 -> Just a) where- Base64 a = _Base64 # a+pattern Base64 a <- (preview _Base64 -> Just a)+ where Base64 a = _Base64 # a --- | Unidirectional pattern synonym for base64url-encoded 'Text' values.+-- | Bidirectional pattern synonym for base64url-encoded 'Text' values. -- pattern Base64Url :: Text -> Text-pattern Base64Url a <- (preview _Base64Url -> Just a) where- Base64Url a = _Base64Url # a+pattern Base64Url a <- (preview _Base64Url -> Just a)+ where Base64Url a = _Base64Url # a --- | Unidirectional pattern synonym for unpadded base64-encoded 'Text' values.+-- | Bidirectional pattern synonym for unpadded base64-encoded 'Text' values. -- pattern Base64Unpadded :: Text -> Text-pattern Base64Unpadded a <- (preview _Base64Unpadded -> Just a) where- Base64Unpadded a = _Base64Unpadded # a+pattern Base64Unpadded a <- (preview _Base64Unpadded -> Just a)+ where Base64Unpadded a = _Base64Unpadded # a --- | Unidirectional pattern synonym for unpadded base64url-encoded 'Text' values.+-- | Bidirectional pattern synonym for unpadded base64url-encoded 'Text' values. -- pattern Base64UrlUnpadded :: Text -> Text-pattern Base64UrlUnpadded a <- (preview _Base64UrlUnpadded -> Just a) where- Base64UrlUnpadded a = _Base64UrlUnpadded # a+pattern Base64UrlUnpadded a <- (preview _Base64UrlUnpadded -> Just a)+ where Base64UrlUnpadded a = _Base64UrlUnpadded # a