Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

wrong combinator

  • Loading branch information...
commit b21073ceebef0b0ca9d98ccbfe925010c6d049f5 1 parent 280bcd2
@ekmett authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/Control/Lens/Type.hs
View
2  src/Control/Lens/Type.hs
@@ -319,7 +319,7 @@ type SimpleOverloaded k f a b = Overloaded k f a a b b
-- | Modify the target of a 'Lens' and return the result
--
--- When you do not need the result of the addition, ('Control.Lens.Setter.+~') is more flexible.
+-- When you do not need the result of the addition, ('Control.Lens.Setter.%~') is more flexible.
(<%~) :: LensLike ((,)d) a b c d -> (c -> d) -> a -> (d, b)
l <%~ f = l $ \c -> let d = f c in (d, d)
{-# INLINE (<%~) #-}
Please sign in to comment.
Something went wrong with that request. Please try again.