From 7d5418718ce02a4ff471ebbb9a4cb1c8fc750be7 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Tue, 10 May 2022 15:06:01 +0200
Subject: lease-script: RouterOS v7 path syntax

---
 lease-script | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/lease-script b/lease-script
index 2b873c8..fa03e11 100644
--- a/lease-script
+++ b/lease-script
@@ -27,15 +27,15 @@ $LogPrintExit2 debug $0 ("DHCP Server " . $leaseServerName . " " . [ $IfThenElse
 
 $ScriptLock $0 false 10;
 
-:if ([ :len [ / system script job find where script=$0 ] ] > 1) do={
+:if ([ :len [ /system/script/job/find where script=$0 ] ] > 1) do={
   $LogPrintExit2 debug $0 ("More invocations are waiting, exiting early.") true;
 }
 
 :local RunOrder [ :toarray "" ];
 
-:foreach Script in=[ / system script find where source~("\n# provides: lease-script, ") ] do={
-  :local Name [ / system script get $Script name ];
-  :local Store [ / system script get $Script source ];
+:foreach Script in=[ /system/script/find where source~("\n# provides: lease-script, ") ] do={
+  :local Name [ /system/script/get $Script name ];
+  :local Store [ /system/script/get $Script source ];
 
   :set Store [ :pick $Store ([ :find $Store "\n# provides: lease-script, " ] + 27) [ :len $Store ] ];
   :set Store [ :pick $Store 0 [ :find $Store "\n" ] ];
@@ -47,7 +47,7 @@ $ScriptLock $0 false 10;
 :foreach Order,Script in=$RunOrder do={
   :do {
     $LogPrintExit2 debug $0 ("Running script with order " . $Order . ": " . $Script) false;
-    / system script run $Script;
+    /system/script/run $Script;
   } on-error={
     $LogPrintExit2 warning $0 ("Running script '" . $Script . "' failed!") false;
   }
-- 
cgit v1.2.3-54-g00ecf