diff --git a/lib/Properties.hs b/lib/Properties.hs
index db1ca418a740ce404104b061913827bed3256107..c057b63aa7393d982299f0cb1f600faa585d0599 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