mirror.MikroTik/eworm.routeros-scripts
1
0
Fork 0
mirror of https://git.eworm.de/cgit/routeros-scripts synced 2025-07-10 10:04:28 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

global-functions: introduce function $PrettyPrint

Browse source 
... to add trailing carriage return when printing to terminal:

[admin@MikroTik] > $PrettyPrint [ $DeviceInfo ]
Hostname:       MikroTik
Board name:     hAP ac^2
Architecture:   arm
Model:          RouterBOARD D52G-5HacD2HnD-TC
Serial number:  8A2A09A221A1
RouterOS:
    Channel:    testing
    Installed:  7.4rc1
RouterOS-Scripts:
    Current:    81
This commit is contained in:
Christian Hesse 2022-07-05 12:29:29 +02:00
parent b0992da03d
commit eda75f0bbc
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

10
global-functions
View file

@ -40,6 +40,7 @@
:global MkDir; :global MkDir;
:global NotificationFunctions; :global NotificationFunctions;
:global ParseKeyValueStore; :global ParseKeyValueStore;
:global PrettyPrint;
:global QuotedPrintable; :global QuotedPrintable;
:global RandomDelay; :global RandomDelay;
:global Read; :global Read;
@ -648,6 +649,15 @@
:return $Result; :return $Result;
} }
# print lines with trailing carriage return
:set PrettyPrint do={
:local Input [ :tostr $1 ];
:global CharacterReplace;
:put [ $CharacterReplace $Input ("\n") ("\n\r") ];
}
# convert string to quoted-printable # convert string to quoted-printable
:global QuotedPrintable do={ :global QuotedPrintable do={
:local Input [ :tostr $1 ]; :local Input [ :tostr $1 ];