From ed95d5d80992c3e209174c14084dd0c8280e4aad Mon Sep 17 00:00:00 2001
From: Andrei Bulgakov <a.bulgakov@andersenlab.com>
Date: Thu, 3 Jun 2021 15:30:43 +0300
Subject: [PATCH] Add urlencode pipeline using awk

So that the script can work with files with spaces and other special
characters in the path.
---
 dragon/cpdragon | 3 ++-
 dragon/mvdragon | 3 ++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/dragon/cpdragon b/dragon/cpdragon
index 1bbaccd..3eb050a 100755
--- a/dragon/cpdragon
+++ b/dragon/cpdragon
@@ -3,7 +3,8 @@ files=$(dragon-drag-and-drop -t -x)
 
 for file in $files
 do
-  path=${file#file://}
+  path=$(echo ${file#file://} |
+    awk -niord '{printf RT?$0chr("0x"substr(RT,2)):$0}' RS=%..)
   name=$(basename "$path")
   cp "$path" "$(pwd)/$name"
 done
diff --git a/dragon/mvdragon b/dragon/mvdragon
index dd3dc12..27151cd 100755
--- a/dragon/mvdragon
+++ b/dragon/mvdragon
@@ -4,7 +4,8 @@ files=$(dragon-drag-and-drop -t -x)
 
 for file in $files
 do
-  path=${file#file://}
+  path=$(echo ${file#file://} |
+    awk -niord '{printf RT?$0chr("0x"substr(RT,2)):$0}' RS=%..)
   name=$(basename "$path")
   mv "$path" "$(pwd)/$name"
 done