Fix quoting of replacement text, avoiding "unmatched ]"

2021-02-21 12:33:55 +00:00 · 2021-02-21 12:33:55 +00:00 · 32ac3c8421
commit 32ac3c8421
parent f5180dc144
1 changed files with 2 additions and 2 deletions
--- a/webif/lib/utils
+++ b/webif/lib/utils
@ -103,13 +103,13 @@ proc ::js::_unescape {str} {
 proc ::js::escape {str} {
 	return [subst -nobackslashes -novariables \
 		[regsub -all -- {[^A-Za-z0-9@*_+-./]+} $str \
-			{[::js::_escape "&"]}]]
+			{[::js::_escape {&}]}]]
 }

 proc ::js::unescape {str} {
 	return [subst -nobackslashes -novariables \
 		[regsub -all -- {%(u[[:xdigit:]]{2})?[[:xdigit:]]{2}} $str \
-			{[::js::_unescape "&"]}]]
+			{[::js::_unescape {&}]}]]
 }

 alias jsescape ::js::escape