From 8f5af0492e7a82192d1fafda3d2c74421af4354d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Sven=20G=2E=20Bro=CC=88nstrup?= <broenstrup@spom.net>
Date: Sun, 19 Dec 2021 20:11:55 +0100
Subject: [PATCH] Wrap urls for inline iframes
---
lib/Properties.hs | 3 +++
1 file changed, 3 insertions(+)
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
--
GitLab