iri 0.2 → 0.3
raw patch · 2 files changed
+31/−31 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
- Iri.Optics: iriFragmentLens :: Lens' Iri Text
- Iri.Optics: iriHierarchyLens :: Lens' Iri Hierarchy
- Iri.Optics: iriHttpIriPrism :: Prism' Iri HttpIri
- Iri.Optics: iriQueryLens :: Lens' Iri Text
- Iri.Optics: iriSchemeLens :: Lens' Iri ByteString
- Iri.Optics: iriTextHttpIriPrism :: Prism' Text HttpIri
- Iri.Optics: iriTextIriPrism :: Prism' Text Iri
- Iri.Optics: uriByteStringHttpIriPrism :: Prism' ByteString HttpIri
- Iri.Optics: uriByteStringIriPrism :: Prism' ByteString Iri
+ Iri.Optics: iriFragment :: Lens' Iri Text
+ Iri.Optics: iriHierarchy :: Lens' Iri Hierarchy
+ Iri.Optics: iriHttpIri :: Prism' Iri HttpIri
+ Iri.Optics: iriQuery :: Lens' Iri Text
+ Iri.Optics: iriScheme :: Lens' Iri ByteString
+ Iri.Optics: iriTextHttpIri :: Prism' Text HttpIri
+ Iri.Optics: iriTextIri :: Prism' Text Iri
+ Iri.Optics: uriByteStringHttpIri :: Prism' ByteString HttpIri
+ Iri.Optics: uriByteStringIri :: Prism' ByteString Iri
Files
- iri.cabal +2/−2
- library/Iri/Optics.hs +29/−29
iri.cabal view
@@ -1,9 +1,9 @@ name: iri version:- 0.2+ 0.3 category:- IRI, URI, URL, Data, Network+ URI, URL, IRI, Network synopsis: RFC-based International Resource Identifier library description:
library/Iri/Optics.hs view
@@ -12,16 +12,16 @@ Prism, Prism', -- * Prisms- iriHttpIriPrism,- uriByteStringIriPrism,- uriByteStringHttpIriPrism,- iriTextIriPrism,- iriTextHttpIriPrism,+ iriHttpIri,+ uriByteStringIri,+ uriByteStringHttpIri,+ iriTextIri,+ iriTextHttpIri, -- * Lenses- iriSchemeLens,- iriHierarchyLens,- iriQueryLens,- iriFragmentLens,+ iriScheme,+ iriHierarchy,+ iriQuery,+ iriFragment, ) where @@ -54,50 +54,50 @@ -- * Prisms ------------------------- -iriHttpIriPrism :: Prism' Iri HttpIri-iriHttpIriPrism =+iriHttpIri :: Prism' Iri HttpIri+iriHttpIri = prism iriFromHttpIri (\ iri -> either (const (Left iri)) Right (httpIriFromIri iri)) -uriByteStringIriPrism :: Prism' ByteString Iri-uriByteStringIriPrism =+uriByteStringIri :: Prism' ByteString Iri+uriByteStringIri = prism A.uri (\ bytes -> either (const (Left bytes)) Right (B.uri bytes)) -uriByteStringHttpIriPrism :: Prism' ByteString HttpIri-uriByteStringHttpIriPrism =- uriByteStringIriPrism . iriHttpIriPrism+uriByteStringHttpIri :: Prism' ByteString HttpIri+uriByteStringHttpIri =+ uriByteStringIri . iriHttpIri -iriTextIriPrism :: Prism' Text Iri-iriTextIriPrism =+iriTextIri :: Prism' Text Iri+iriTextIri = prism C.iri (\ text -> either (const (Left text)) Right (D.iri text)) -iriTextHttpIriPrism :: Prism' Text HttpIri-iriTextHttpIriPrism =- iriTextIriPrism . iriHttpIriPrism+iriTextHttpIri :: Prism' Text HttpIri+iriTextHttpIri =+ iriTextIri . iriHttpIri -- * Lenses ------------------------- -iriSchemeLens :: Lens' Iri ByteString-iriSchemeLens =+iriScheme :: Lens' Iri ByteString+iriScheme = lens (\ (Iri (Scheme x) _ _ _) -> x) (\ (Iri _ hierarchy query fragment) x -> Iri (Scheme x) hierarchy query fragment) -iriHierarchyLens :: Lens' Iri Hierarchy-iriHierarchyLens =+iriHierarchy :: Lens' Iri Hierarchy+iriHierarchy = lens (\ (Iri _ x _ _) -> x) (\ (Iri scheme _ query fragment) x -> Iri scheme x query fragment) -iriQueryLens :: Lens' Iri Text-iriQueryLens =+iriQuery :: Lens' Iri Text+iriQuery = lens (\ (Iri _ _ (Query x) _) -> x) (\ (Iri scheme hierarchy _ fragment) x -> Iri scheme hierarchy (Query x) fragment) -iriFragmentLens :: Lens' Iri Text-iriFragmentLens =+iriFragment :: Lens' Iri Text+iriFragment = lens (\ (Iri _ _ _ (Fragment x)) -> x) (\ (Iri scheme hierarchy query _) x -> Iri scheme hierarchy query (Fragment x))