From 76073dd28c46f59c247f09846f43bd92c016f8af Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Sven=20G=2E=20Bro=CC=88nstrup?= <broenstrup@spom.net>
Date: Mon, 20 Dec 2021 00:42:50 +0100
Subject: [PATCH] Added extended script action zone properties
---
lib/Properties.hs | 11 +++++++++++
1 file changed, 11 insertions(+)
diff --git a/lib/Properties.hs b/lib/Properties.hs
index 551c502..75b69ae 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -499,6 +499,17 @@ checkTileLayerProperty p@(Property name _value) = case name of
isString p
requireProperty "bellVariable"
+ -- | these properties are used by the extended script to allow action zones¶
+ "bindVariable" -> do
+ isString p
+ requireProperty "zone"
+ "enterValue" -> do
+ isString p
+ requireProperty "bindVariable"
+ "leaveValue" -> do
+ isString p
+ requireProperty "bindVariable"
+
-- name on tile layer unsupported
"name" -> isUnsupported
--
GitLab