From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 19 Oct 2025 19:23:05 +0000 (+0100)
Subject: Don't quote when not wanted!
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;p=bcp5-registry.git

Don't quote when not wanted!
---

diff --git a/utils.pl b/utils.pl
index 0977e41..a665b95 100644
--- a/utils.pl
+++ b/utils.pl
@@ -106,9 +106,11 @@ sub getvar ($) {
 sub getvar_mightquote ($$) {
   my ($vn, $quote_html) = @_;
   my $v = getvar($vn);
-  $v =~ s/\&/&amp;/g;  
-  $v =~ s/\</&lt;/g;  
-  $v =~ s/\>/&gt;/g;  
+  if ($quote_html) {
+    $v =~ s/\&/&amp;/g;
+    $v =~ s/\</&lt;/g;
+    $v =~ s/\>/&gt;/g;
+  }
   return $v;
 }