summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--lib/Properties.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs
index bb18499..db4908e 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -343,10 +343,9 @@ checkTileLayerProperty p@(Property name _value) = case name of
"startLayer" -> do
forbidEmptyLayer
layer <- askContext
- offersEntrypoint $ layerName layer
unwrapBool p $ \case
- True -> pure ()
- False -> complain "property \"startLayer\" must be set to true."
+ True -> offersEntrypoint $ layerName layer
+ False -> warn "property \"startLayer\" is useless if set to false."
"silent" -> do
isBool p
uselessEmptyLayer