diff options
| -rw-r--r-- | lib/Properties.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs index bdb7911..be6637b 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 |