summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorstuebinm2021-12-14 00:00:44 +0100
committerstuebinm2021-12-14 00:00:44 +0100
commiteeb78b3f0a634d58258873e57194ba41af3d3711 (patch)
tree644c85446e0848b9fd93b3ed9c27f7283d1e627d
parent8548481fa152f146e7213cddca5e3b400999c150 (diff)
startLayer can actually be set to `false`
(in which case it just doesn't do anything at all)
-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