diff options
| author | Sven G. Brönstrup | 2021-12-20 12:03:05 +0100 |
|---|---|---|
| committer | Sven G. Brönstrup | 2021-12-20 12:03:05 +0100 |
| commit | 7709a44520aabdfe4657c0abff3a5acc40bedc0f (patch) | |
| tree | 5af5db37e58538cc0107725eafb989eeaad1b15c | |
| parent | 61901841d04b824668cd0f382ee039573ebb9479 (diff) | |
Resolved merge conflict
| -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 |