1 files changed, 10 insertions, 0 deletions
diff --git a/global-functions b/global-functions
index 3a2497e..daa6526 100644
--- a/global-functions
+++ b/global-functions
@@ -40,6 +40,7 @@
 :global MkDir;
 :global NotificationFunctions;
 :global ParseKeyValueStore;
+:global PrettyPrint;
 :global QuotedPrintable;
 :global RandomDelay;
 :global Read;
@@ -648,6 +649,15 @@
   :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
 :global QuotedPrintable do={
   :local Input [ :tostr $1 ];