From cf79e6c473e8d840aee32922cdc5efb00aa67900 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Fri, 3 Jan 2020 11:14:47 +0100
Subject: global-functions: do not encode dash, dot, slash and underscore

---
 global-functions | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/global-functions b/global-functions
index 45b76d2..611241f 100644
--- a/global-functions
+++ b/global-functions
@@ -39,11 +39,10 @@
   :local Return "";
 
   :if ([ :len $Input ] > 0) do={
-    :local Chars " !\"#\$%&'()*+,-./:;<=>\?@[\\]^_`{|}~";
+    :local Chars " !\"#\$%&'()*+,:;<=>\?@[\\]^`{|}~";
     :local Subs { "%20"; "%21"; "%22"; "%23"; "%24"; "%25"; "%26"; "%27"; "%28"; "%29";
-                  "%2A"; "%2B"; "%2C"; "%2D"; "%2E"; "%2F"; "%3A"; "%3B"; "%3C"; "%3D";
-                  "%3E"; "%3F"; "%40"; "%5B"; "%5C"; "%5D"; "%5E"; "%5F"; "%60"; "%7B";
-                  "%7C"; "%7D"; "%7E" };
+                  "%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