diff options
-rw-r--r-- | lib/Properties.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs index db1ca41..c057b63 100644 --- a/lib/Properties.hs +++ b/lib/Properties.hs @@ -197,7 +197,7 @@ checkLayer = do -- all objects which don't define badges publicObjects <- askContext <&> - fmap (V.filter (`containsProperty` "getBadge")) . layerObjects + fmap (V.filter (not . (`containsProperty` "getBadge"))) . layerObjects -- remove badges from output adjust $ \l -> l { layerObjects = publicObjects |