always use severity 'warning', not just 'warn'

This commit is contained in:
Christian Hesse 2020-03-05 09:18:23 +01:00
parent e104b54bf0
commit bf41a8d48a
4 changed files with 5 additions and 5 deletions

View file

@ -17,7 +17,7 @@ $ScriptLock "collect-wireless-mac.capsman";
:if ([ / caps-man access-list print count-only where comment="--- collected above ---" disabled ] = 0) do={ :if ([ / caps-man access-list print count-only where comment="--- collected above ---" disabled ] = 0) do={
/ caps-man access-list add comment="--- collected above ---" disabled=yes; / caps-man access-list add comment="--- collected above ---" disabled=yes;
$LogPrintExit warn "Added disabled access-list entry with comment '--- collected above ---'." false; $LogPrintExit warning "Added disabled access-list entry with comment '--- collected above ---'." false;
} }
:local PlaceBefore [ / caps-man access-list find where comment="--- collected above ---" disabled ]; :local PlaceBefore [ / caps-man access-list find where comment="--- collected above ---" disabled ];

View file

@ -17,7 +17,7 @@ $ScriptLock "collect-wireless-mac.local";
:if ([ / interface wireless access-list print count-only where comment="--- collected above ---" disabled ] = 0) do={ :if ([ / interface wireless access-list print count-only where comment="--- collected above ---" disabled ] = 0) do={
/ interface wireless access-list add comment="--- collected above ---" disabled=yes; / interface wireless access-list add comment="--- collected above ---" disabled=yes;
$LogPrintExit warn "Added disabled access-list entry with comment '--- collected above ---'." false; $LogPrintExit warning "Added disabled access-list entry with comment '--- collected above ---'." false;
} }
:local PlaceBefore [ / interface wireless access-list find where comment="--- collected above ---" disabled ]; :local PlaceBefore [ / interface wireless access-list find where comment="--- collected above ---" disabled ];

View file

@ -18,7 +18,7 @@ $ScriptLock "collect-wireless-mac%TEMPL%";
:if ([ / %PATH% access-list print count-only where comment="--- collected above ---" disabled ] = 0) do={ :if ([ / %PATH% access-list print count-only where comment="--- collected above ---" disabled ] = 0) do={
/ %PATH% access-list add comment="--- collected above ---" disabled=yes; / %PATH% access-list add comment="--- collected above ---" disabled=yes;
$LogPrintExit warn "Added disabled access-list entry with comment '--- collected above ---'." false; $LogPrintExit warning "Added disabled access-list entry with comment '--- collected above ---'." false;
} }
:local PlaceBefore [ / %PATH% access-list find where comment="--- collected above ---" disabled ]; :local PlaceBefore [ / %PATH% access-list find where comment="--- collected above ---" disabled ];

View file

@ -49,7 +49,7 @@
:if ([ / system resource get free-hdd-space ] < 8388608 && \ :if ([ / system resource get free-hdd-space ] < 8388608 && \
[ / certificate settings get crl-download ] = true && \ [ / certificate settings get crl-download ] = true && \
[ / certificate settings get crl-store ] = "system") do={ [ / certificate settings get crl-store ] = "system") do={
:log warn "This system has low free flash space but is configured to download certificate CRLs to system!"; :log warning "This system has low free flash space but is configured to download certificate CRLs to system!";
} }
:if ([ / certificate print count-only where common-name=$CommonName ] = 0) do={ :if ([ / certificate print count-only where common-name=$CommonName ] = 0) do={
@ -299,7 +299,7 @@
:local MailHost $MailServer; :local MailHost $MailServer;
:if ([ / tool netwatch print count-only where comment=$MailServer ] = 0) do={ :if ([ / tool netwatch print count-only where comment=$MailServer ] = 0) do={
:log warn ("Adding netwatch entry for mail server."); :log warning ("Adding netwatch entry for mail server.");
:local MailHost $MailServer; :local MailHost $MailServer;
:if ([ :typeof [ :toip $MailHost ] ] != "ip" ) do={ :if ([ :typeof [ :toip $MailHost ] ] != "ip" ) do={
:set MailHost [ :resolve $MailServer ]; :set MailHost [ :resolve $MailServer ];