diff --git a/src/Data/Mergeable/Generic.hs b/src/Data/Mergeable/Generic.hs index 3d7bd0649..a9bb83d89 100644 --- a/src/Data/Mergeable/Generic.hs +++ b/src/Data/Mergeable/Generic.hs @@ -43,4 +43,4 @@ instance GMergeable [] where instance GMergeable Maybe where gmerge f (Just a) = Just <$> f a - gmerge _ Nothing = empty + gmerge _ Nothing = pure empty