From fc994402241d97d084669d63f1c8c2accc2550c7 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Tue, 13 Oct 2020 08:43:42 +0200
Subject: global-functions: $UrlEncode: encode new line & carriage return

---
 global-functions | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'global-functions')

diff --git a/global-functions b/global-functions
index 2716355..10c5bd9 100644
--- a/global-functions
+++ b/global-functions
@@ -879,10 +879,11 @@
   :local Return "";
 
   :if ([ :len $Input ] > 0) do={
-    :local Chars " !\"#\$%&'()*+,:;<=>\?@[\\]^`{|}~";
-    :local Subs { "%20"; "%21"; "%22"; "%23"; "%24"; "%25"; "%26"; "%27"; "%28"; "%29";
-                  "%2A"; "%2B"; "%2C"; "%3A"; "%3B"; "%3C"; "%3D"; "%3E"; "%3F"; "%40";
-                  "%5B"; "%5C"; "%5D"; "%5E"; "%60"; "%7B"; "%7C"; "%7D"; "%7E" };
+    :local Chars "\n\r !\"#\$%&'()*+,:;<=>\?@[\\]^`{|}~";
+    :local Subs { "%0A"; "%0D"; "%20"; "%21"; "%22"; "%23"; "%24"; "%25"; "%26"; "%27";
+                  "%28"; "%29"; "%2A"; "%2B"; "%2C"; "%3A"; "%3B"; "%3C"; "%3D"; "%3E";
+                  "%3F"; "%40"; "%5B"; "%5C"; "%5D"; "%5E"; "%60"; "%7B"; "%7C"; "%7D";
+                  "%7E" };
 
     :for I from=0 to=([ :len $Input ] - 1) do={
       :local Char [ :pick $Input $I ];
-- 
cgit v1.2.3-70-g09d2