diff --git a/lib/Properties.hs b/lib/Properties.hs index bdb791178742eceae573f390bc5bb490f5a188b4..be6637bd168a61e216014556c3fa47663c6fd2d6 100644 --- a/lib/Properties.hs +++ b/lib/Properties.hs @@ -204,11 +204,20 @@ checkLayerProperty p@(Property name _value) = case name of "silent" -> do isBool p uselessEmptyLayer + "collides" -> isUnsupported + "default" -> isUnsupported + "exitSceneUrl" -> isUnsupported + "jitsiWidth" -> isUnsupported + "name" -> isUnsupported + "readableBy" -> isUnsupported + "writableBy" -> isUnsupported + "zone" -> isUnsupported _ -> complain $ "unknown property type " <> prettyprint name where isForbidden = forbidProperty name requireProperty req = propertyRequiredBy req name + isUnsupported = warn $ "property " <> name <> " is not (yet) supported by walint." -- | this property can only be used on a layer that contains at least one tiles forbidEmptyLayer = do