@@ -32,6 +32,8 @@ import qualified Data.Map as Map (showTree, showTreeWith)
33import qualified Data.Witherable as W
33import qualified Data.Witherable as W
34import Data.Map.Monoidal
34import Data.Map.Monoidal
35+import qualified Data.Map.Monoidal as MonoidalMap
36{-# DEPRECATED AppendMap "Use 'MonoidalMap' instead" #-}
38{-# DEPRECATED AppendMap "Use 'MonoidalMap' instead" #-}
37-- | AppendMap is a synonym for 'Data.Map.Monoidal.MonoidalMap'
39-- | AppendMap is a synonym for 'Data.Map.Monoidal.MonoidalMap'
@@ -48,7 +50,7 @@ pattern AppendMap m = MonoidalMap m
49#if !MIN_VERSION_witherable(0,3,2)
51#if !MIN_VERSION_witherable(0,3,2)
50instance W.Filterable (MonoidalMap k) where
52instance W.Filterable (MonoidalMap k) where
51− mapMaybe = W.mapMaybe
53+ mapMaybe = MonoidalMap.mapMaybe
54-- | Deletes a key, returning 'Nothing' if the result is empty.
56-- | Deletes a key, returning 'Nothing' if the result is empty.