util 0.1.17.0 → 0.1.17.1

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

Util.hs +1/−1
util.cabal +1/−1

Util.hs view

@@ -178,7 +178,7 @@ minimumBy f = foldr (\ a -> Just . fromMaybe a & \ b -> case f a b of LT -> a; _ -> b) Nothing  foldMapA :: (Applicative p, Monoid b, Foldable f) => (a -> p b) -> f a -> p b-foldMapA f = foldr (liftA2 mappend . f) (pure mempty)+foldMapA f = unAp . foldMap (Ap . f)  altMap :: (Alternative p, Foldable f) => (a -> p b) -> f a -> p b altMap f = foldr ((<|>) . f) empty

util.cabal view

@@ -1,5 +1,5 @@ name:                util-version:             0.1.17.0+version:             0.1.17.1 synopsis:            Utilities -- description:          license:             BSD3