From b9edcea6b53fe026d502e42b5ab77dc44a366fa9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Na=C3=AFm=20Favier?= Date: Mon, 31 Jul 2023 14:49:38 +0200 Subject: [PATCH] fix KeyMap.union doc --- src/Data/Aeson/KeyMap.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Data/Aeson/KeyMap.hs b/src/Data/Aeson/KeyMap.hs index 9c28d162e..6cb24931d 100644 --- a/src/Data/Aeson/KeyMap.hs +++ b/src/Data/Aeson/KeyMap.hs @@ -268,7 +268,7 @@ toAscList = M.toAscList . unKeyMap difference :: KeyMap v -> KeyMap v' -> KeyMap v difference tm1 tm2 = KeyMap (M.difference (unKeyMap tm1) (unKeyMap tm2)) --- The (left-biased) union of two maps. It prefers the first map when duplicate +-- | The (left-biased) union of two maps. It prefers the first map when duplicate -- keys are encountered, i.e. ('union' == 'unionWith' 'const'). union :: KeyMap v -> KeyMap v -> KeyMap v union (KeyMap x) (KeyMap y) = KeyMap (M.union x y) @@ -477,7 +477,7 @@ toAscList = sortBy (comparing fst) . toList difference :: KeyMap v -> KeyMap v' -> KeyMap v difference tm1 tm2 = KeyMap (H.difference (unKeyMap tm1) (unKeyMap tm2)) --- The (left-biased) union of two maps. It prefers the first map when duplicate +-- | The (left-biased) union of two maps. It prefers the first map when duplicate -- keys are encountered, i.e. ('union' == 'unionWith' 'const'). union :: KeyMap v -> KeyMap v -> KeyMap v union (KeyMap x) (KeyMap y) = KeyMap (H.union x y)