From 8f75d542f3aa7cb3c5726412daa0ab41c6880489 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Thu, 11 Jul 2024 23:06:57 +0200
Subject: global-functions: $PrettyPrint: use :tocrlf

---
 global-functions.rsc | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

(limited to 'global-functions.rsc')

diff --git a/global-functions.rsc b/global-functions.rsc
index 312936b..950ccd6 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -909,11 +909,7 @@
 
 # print lines with trailing carriage return
 :set PrettyPrint do={
-  :local Input [ :tostr $1 ];
-
-  :global Unix2Dos;
-
-  :put [ $Unix2Dos $Input ];
+  :put [ :tocrlf [ :tostr $1 ] ];
 }
 
 # strip protocol from from url string
-- 
cgit v1.2.3-70-g09d2