on develop help sign in
Fix broken recursive looping instance
44fae82Oliver Batchelor
src/Data/AppendMap.hs+1−1
@@ -48,7 +48,7 @@ pattern AppendMap m = MonoidalMap m
48
48
49#if !MIN_VERSION_witherable(0,3,2)
49#if !MIN_VERSION_witherable(0,3,2)
50instance W.Filterable (MonoidalMap k) where
50instance W.Filterable (MonoidalMap k) where
51− mapMaybe = mapMaybe
51+ mapMaybe = W.mapMaybe
52#endif
52#endif
53
53
54-- | Deletes a key, returning 'Nothing' if the result is empty.
54-- | Deletes a key, returning 'Nothing' if the result is empty.