aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--sms-action13
1 files changed, 8 insertions, 5 deletions
diff --git a/sms-action b/sms-action
index 2d2600d..e48c632 100644
--- a/sms-action
+++ b/sms-action
@@ -13,6 +13,7 @@
:global SmsAction;
:global LogPrintExit2;
+:global ValidateSyntax;
:local Action $action;
@@ -21,8 +22,10 @@
}
:local Code ($SmsAction->$Action);
-:local Parsed [ :parse $Code ];
-
-:log info ("Acting on SMS action '" . $Action . "': " . $Code);
-:delay 1s;
-$Parsed;
+:if ([ $ValidateSyntax $Code ] = true) do={
+ :log info ("Acting on SMS action '" . $Action . "': " . $Code);
+ :delay 1s;
+ [ :parse $Code ];
+} else={
+ $LogPrintExit2 warning $0 ("The code for action '" . $Action . "' failed syntax validation!") false;
+}