From 9fc5405abffe2f42880ec682139a7f6cea6926f2 Mon Sep 17 00:00:00 2001
From: df <fieldhouse@gmx.net>
Date: Fri, 8 May 2020 10:30:24 +0000
Subject: [PATCH] Prepare for cgi_unquote_html API in cgi.tcl

---
 webif/plugin/sweeper/save.jim | 6 +-----
 webif/plugin/sweeper/test.jim | 6 +-----
 2 files changed, 2 insertions(+), 10 deletions(-)

diff --git a/webif/plugin/sweeper/save.jim b/webif/plugin/sweeper/save.jim
index 7d4a228..423627b 100755
--- a/webif/plugin/sweeper/save.jim
+++ b/webif/plugin/sweeper/save.jim
@@ -34,11 +34,7 @@ if {$dir eq "" || $dir eq $root} {
 	}
 }
 
-set data [string map {
-	&amp; &
-	&lt; <
-	&gt; >
-} [cgi_get data "-"]]
+set data [cgi_unquote_html [cgi_get data "-"]]
 
 if {$data eq "-" || $data eq ""} {
 	if {[file exists $cf]} { file delete $cf }
diff --git a/webif/plugin/sweeper/test.jim b/webif/plugin/sweeper/test.jim
index 882a2b5..061e2bc 100755
--- a/webif/plugin/sweeper/test.jim
+++ b/webif/plugin/sweeper/test.jim
@@ -10,11 +10,7 @@ set dryrun [cgi_get dryrun 1]
 
 set cf "/tmp/sweepertest.cf"
 
-set data [string map {
-	&amp; &
-	&lt; <
-	&gt; >
-} [cgi_get data "-"]]
+set data [cgi_unquote_html [cgi_get data "-"]]
 
 if {$data eq "-" || $data eq ""} {
 	puts "No data sent!"