summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSven G. Brönstrup2021-12-19 20:11:55 +0100
committerSven G. Brönstrup2021-12-19 20:11:55 +0100
commit8f5af0492e7a82192d1fafda3d2c74421af4354d (patch)
treeb1fdf66d5b55d1255022d353639d800494cd2af9
parent864235b3222563dceace6e8981cba6e7145585f9 (diff)
Wrap urls for inline iframes
-rw-r--r--lib/Properties.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs
index 7fc58c9..25bbbd3 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