summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Properties.hs6
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