summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Properties.hs2
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