diff --git a/lib/Properties.hs b/lib/Properties.hs index 7fc58c903eadfa530eb8e48d040e86e52810b6fd..25bbbd331b8d4bae35083692ea8cf33221156401 100644 --- a/lib/Properties.hs +++ b/lib/Properties.hs @@ -229,6 +229,9 @@ checkObjectProperty :: Object -> Property -> LintWriter Layer checkObjectProperty obj p@(Property name _) = case name of "url" -> do pure () + unwrapURI (Proxy @"website") p + (dependsOn . Link) + (dependsOn . Local) unless (objectType obj == "website") $ complain "\"url\" can only be set for objects of type \"website\"" "allowApi" -> forbidProperty name