Skip to content

Commit 456cb1f

Browse files
Remove (++~) and (++=) as (++) is removed from prelude (#58)
Co-authored-by: Thomas Honeyman <[email protected]>
1 parent e3beeb2 commit 456cb1f

File tree

2 files changed

+1
-5
lines changed

2 files changed

+1
-5
lines changed

src/Data/Lens.purs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -29,7 +29,7 @@ import Data.Lens.Lens (ALens, ALens', Lens, Lens', cloneLens, lens, lens', withL
2929
import Data.Lens.Prism (APrism, APrism', Prism, Prism', Review, Review', clonePrism, is, isn't, matching, nearly, only, prism, prism', review, withPrism)
3030
import Data.Lens.Traversal (Traversal, Traversal', element, elementsOf, failover, itraverseOf, sequenceOf, traverseOf, traversed)
3131
import Data.Lens.Types (class Wander, ALens, ALens', APrism, APrism', AnIso, AnIso', ATraversal, ATraversal', Fold, Fold', Getter, Getter', AGetter, AGetter', IndexedFold, IndexedFold', IndexedGetter, IndexedGetter', IndexedOptic, IndexedOptic', IndexedSetter, IndexedSetter', IndexedTraversal, IndexedTraversal', Iso, Iso', Lens, Lens', Optic, Optic', Prism, Prism', Review, Review', Setter, Setter', Traversal, Traversal', Exchange(..), Forget(..), Indexed(..), Market(..), Re(..), Shop(..), Tagged(..), wander)
32-
import Data.Lens.Setter (IndexedSetter, Setter, Setter', Indexed(..), addModifying, addOver, appendModifying, appendOver, assign, assignJust, conjModifying, conjOver, disjModifying, disjOver, divModifying, divOver, iover, modifying, mulModifying, mulOver, over, set, setJust, subModifying, subOver, (%=), (%~), (&&=), (&&~), (*=), (*~), (++=), (++~), (+=), (+~), (-=), (-~), (.=), (.~), (//=), (//~), (<>=), (<>~), (?=), (?~), (||=), (||~))
32+
import Data.Lens.Setter (IndexedSetter, Setter, Setter', Indexed(..), addModifying, addOver, appendModifying, appendOver, assign, assignJust, conjModifying, conjOver, disjModifying, disjOver, divModifying, divOver, iover, modifying, mulModifying, mulOver, over, set, setJust, subModifying, subOver, (%=), (%~), (&&=), (&&~), (*=), (*~), (+=), (+~), (-=), (-~), (.=), (.~), (//=), (//~), (<>=), (<>~), (?=), (?~), (||=), (||~))
3333
import Data.Lens.Getter (Fold, Getter, IndexedFold, IndexedGetter, Optic, Indexed(..), iuse, iview, to, takeBoth, use, view, viewOn, (^.), cloneGetter)
3434
import Data.Lens.Fold (Fold, Fold', allOf, andOf, anyOf, elemOf, filtered, findOf, firstOf, foldMapOf, foldOf, folded, foldlOf, foldrOf, has, hasn't, iallOf, ianyOf, ifoldMapOf, ifoldlOf, ifoldrOf, itoListOf, itraverseOf_, lastOf, lengthOf, maximumOf, minimumOf, notElemOf, orOf, preview, previewOn, productOf, replicated, sequenceOf_, sumOf, toArrayOf, toArrayOfOn, toListOf, toListOfOn, unfolded, (^..), (^?))
3535
import Data.Lens.Common (_1, _2, _Just, _Left, _Nothing, _Right, first, left, right, second, united)

src/Data/Lens/Setter.purs

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,6 @@ module Data.Lens.Setter
99
, (||~), disjOver
1010
, (&&~), conjOver
1111
, (<>~), appendOver
12-
, (++~)
1312
, (?~), setJust
1413
, (.=), assign
1514
, (%=), modifying
@@ -20,7 +19,6 @@ module Data.Lens.Setter
2019
, (||=), disjModifying
2120
, (&&=), conjModifying
2221
, (<>=), appendModifying
23-
, (++=)
2422
, (?=), assignJust
2523
, module Data.Lens.Types
2624
) where
@@ -42,7 +40,6 @@ infixr 4 divOver as //~
4240
infixr 4 disjOver as ||~
4341
infixr 4 conjOver as &&~
4442
infixr 4 appendOver as <>~
45-
infixr 4 appendOver as ++~
4643
infixr 4 setJust as ?~
4744

4845
infix 4 assign as .=
@@ -54,7 +51,6 @@ infix 4 divModifying as //=
5451
infix 4 disjModifying as ||=
5552
infix 4 conjModifying as &&=
5653
infix 4 appendModifying as <>=
57-
infix 4 appendModifying as ++=
5854
infix 4 assignJust as ?=
5955

6056
-- | Apply a function to the foci of a `Setter`.

0 commit comments

Comments
 (0)