From cfb492c4b1cf526db373f84eb92498eafd12cd0b Mon Sep 17 00:00:00 2001
From: "dave%intrec.com" <>
Date: Wed, 24 Jan 2001 09:54:42 +0000
Subject: Fix for bug 45784: URL field truncated at quote marks.  Patch by
 jake@acutex.net

---
 bug_form.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/bug_form.pl b/bug_form.pl
index 3fd71c99e..58f1b6cb2 100644
--- a/bug_form.pl
+++ b/bug_form.pl
@@ -161,7 +161,7 @@ if (scalar(@ccList) > 0) {
         "<INPUT TYPE=CHECKBOX NAME=removecc>Remove selected CCs<br>\n";
 }
 
-my $URL = $bug{'bug_file_loc'};
+my $URL = value_quote($bug{'bug_file_loc'});
 
 if (defined $URL && $URL ne "none" && $URL ne "NULL" && $URL ne "") {
     $URL = "<B><A HREF=\"$URL\">URL:</A></B>";
@@ -265,7 +265,7 @@ print "
   <TR>
     <TD ALIGN=\"RIGHT\">$URL
     <TD COLSPAN=7>
-      <INPUT NAME=bug_file_loc VALUE=\"$bug{'bug_file_loc'}\" SIZE=60></TD>
+      <INPUT NAME=bug_file_loc VALUE=\"" . value_quote($bug{'bug_file_loc'}) . "\" SIZE=60></TD>
   </TR><TR>
     <TD ALIGN=\"RIGHT\"><B>Summary:</B>
     <TD COLSPAN=7>
-- 
cgit v1.2.3-24-g4f1b