From bbf918e32915d3b7b929ad3ecfff7d51968a9ad4 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Wed, 20 Jan 2021 17:06:34 +0100
Subject: global-functions: $LogPrintExit: colorful output

---
 global-functions | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/global-functions b/global-functions
index c1311cf..d66541d 100644
--- a/global-functions
+++ b/global-functions
@@ -412,6 +412,11 @@
 
   :global PrintDebug;
 
+  :local PrintSeverity do={
+    :local Color { debug=96; info=97; warning=93; error=91 };
+    :return ("\1B[" . $Color->$1 . "m" . $1 . "\1B[0m");
+  }
+
   :if ($Severity ~ "^(debug|error|info)\$") do={
     :if ($Severity = "debug") do={ :log debug $Message; }
     :if ($Severity = "error") do={ :log error $Message; }
@@ -423,9 +428,9 @@
 
   :if ($Severity != "debug" || $PrintDebug = true) do={
     :if ($Exit = "true") do={
-      :error ($Severity . ": " . $Message);
+      :error ([ $PrintSeverity $Severity ] . ": " . $Message);
     } else={
-      :put ($Severity . ": " . $Message);
+      :put ([ $PrintSeverity $Severity ] . ": " . $Message);
     }
   }
 }
-- 
cgit v1.2.3-54-g00ecf