From f46db918453dcb8878b9a0de6e122fb0ea2224d9 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Mon, 22 Feb 2021 15:14:10 +0100
Subject: global: give script or function name in log messages

---
 dhcp-lease-comment.local | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'dhcp-lease-comment.local')

diff --git a/dhcp-lease-comment.local b/dhcp-lease-comment.local
index dc2f708..74de2c8 100644
--- a/dhcp-lease-comment.local
+++ b/dhcp-lease-comment.local
@@ -8,10 +8,11 @@
 #
 # !! Do not edit this file, it is generated from template!
 
+:local 0 "dhcp-lease-comment.local";
 :global GlobalFunctionsReady;
 :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
 
-:global LogPrintExit;
+:global LogPrintExit2;
 
 :foreach Lease in=[ / ip dhcp-server lease find where dynamic=yes status=bound ] do={
   :local LeaseVal [ / ip dhcp-server lease get $Lease ];
@@ -21,7 +22,7 @@
     :set NewComment [ / interface wireless access-list get $AccessList comment ];
   }
   :if ([ :len $NewComment ] != 0 && $LeaseVal->"comment" != $NewComment) do={
-    $LogPrintExit info ("Updating comment for DHCP lease " . $LeaseVal->"mac-address" . ": " . $NewComment) false;
+    $LogPrintExit2 info $0 ("Updating comment for DHCP lease " . $LeaseVal->"mac-address" . ": " . $NewComment) false;
     / ip dhcp-server lease set comment=$NewComment $Lease;
   }
 }
-- 
cgit v1.2.3-54-g00ecf