From 4ccdec602ed668d50212177f31cea5bdf2b20ed2 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Tue, 3 Mar 2020 08:40:16 +0100
Subject: bridge-port-to-default: use $LogPrintExit

---
 bridge-port-to-default | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'bridge-port-to-default')

diff --git a/bridge-port-to-default b/bridge-port-to-default
index 1bb4597..5b3af53 100644
--- a/bridge-port-to-default
+++ b/bridge-port-to-default
@@ -6,6 +6,8 @@
 
 :global BridgePortTo;
 
+:global LogPrintExit;
+
 :foreach BridgePort in=[ / interface bridge port find where comment!="" ] do={
   :local BridgePortVal [ / interface bridge port get $BridgePort ];
   :foreach Comment in=[ :toarray ($BridgePortVal->"comment") ] do={
@@ -13,18 +15,18 @@
       :local BridgeDefault [ :pick $Comment $Len [ :len $Comment ] ];
       :if ($BridgeDefault = "dhcp-client") do={
         :if ($BridgePortVal->"disabled" = false) do={
-          :log info ("Disabling bridge port for interface " . $BridgePortVal->"interface" . ", enabling dhcp client.");
+          $LogPrintExit info ("Disabling bridge port for interface " . $BridgePortVal->"interface" . ", enabling dhcp client.") false;
           / interface bridge port disable $BridgePort;
           / ip dhcp-client enable [ find where interface=$BridgePortVal->"interface" comment="toggle with bridge port" disabled=yes ];
         }
       } else={
         :if ($BridgePortVal->"disabled" = true) do={
-          :log info ("Enabling bridge port for interface " . $BridgePortVal->"interface" . ", disabling dhcp client.");
+          $LogPrintExit info ("Enabling bridge port for interface " . $BridgePortVal->"interface" . ", disabling dhcp client.") false;
           / ip dhcp-client disable [ find where interface=$BridgePortVal->"interface" comment="toggle with bridge port" disabled=no ];
           / interface bridge port enable $BridgePort;
         }
         :if ($BridgeDefault != $BridgePortVal->"bridge") do={
-          :log info ("Changing interface " . $BridgePortVal->"interface" . " to " . $BridgePortTo . " bridge " . $BridgeDefault);
+          $LogPrintExit info ("Changing interface " . $BridgePortVal->"interface" . " to " . $BridgePortTo . " bridge " . $BridgeDefault) false;
           / interface bridge port set bridge=$BridgeDefault $BridgePort;
         } else={
           :log debug ("Interface " . $BridgePortVal->"interface" . " already connected to " . $BridgePortTo . " bridge " . $BridgeDefault);
-- 
cgit v1.2.3-70-g09d2