diff options
-rw-r--r-- | lib/Properties.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs index 970424a..0eaa245 100644 --- a/lib/Properties.hs +++ b/lib/Properties.hs @@ -227,14 +227,10 @@ checkLayer = do checkObjectProperty :: Object -> Property -> LintWriter Layer checkObjectProperty obj p@(Property name _) = case name of - "url" -> unwrapURI (Proxy @"website") p - (dependsOn . Link) - (const $ forbid "using \"url\" to open local html files is disallowed.") "url" -> do - pure () unwrapURI (Proxy @"website") p (dependsOn . Link) - (dependsOn . Local) + (const $ forbid "using \"url\" to open local html files is disallowed.") unless (objectType obj == "website") $ complain "\"url\" can only be set for objects of type \"website\"" "allowApi" -> forbidProperty name |