os/doc
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Properly quote the synopsis and email address to create a legal

Browse source 
mtailto: URL.
This commit is contained in:
Bill Fenner 1997-03-19 21:25:29 +00:00
parent f94484072b
commit 7eb3e626e9
Notes: svn2git 2020-12-08 03:00:23 +00:00 
svn path=/www/; revision=1330
2 changed files with 10 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
data/cgi/query-pr.cgi
View file

@ -1,5 +1,5 @@
#!/usr/bin/perl
# $Id: query-pr.cgi,v 1.3 1996-12-17 17:12:00 fenner Exp $
# $Id: query-pr.cgi,v 1.4 1997-03-19 21:25:29 fenner Exp $
$ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin";
@ -122,7 +122,10 @@ close(Q);
print "$trailer\n</dl>";
print "<A HREF=\"mailto:freebsd-gnats-submit@freebsd.org,${email}?subject=Re: ${cat}/${number}: $syn\">Submit Followup</A>";
$syn =~ s/[\?&%"]/"%" . sprintf("%02X", unpack(C, $&))/eg;
$email =~ s/[\?&%]/"%" . sprintf("%02X", unpack(C, $&))/eg;
print "<A HREF=\"mailto:freebsd-gnats-submit@freebsd.org,${email}?subject=Re: ${cat}/${number}: $syn\">Submit Followup</A>\n";
print &html_footer;

7
en/cgi/query-pr.cgi
View file

@ -1,5 +1,5 @@
#!/usr/bin/perl
# $Id: query-pr.cgi,v 1.3 1996-12-17 17:12:00 fenner Exp $
# $Id: query-pr.cgi,v 1.4 1997-03-19 21:25:29 fenner Exp $
$ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin";
@ -122,7 +122,10 @@ close(Q);
print "$trailer\n</dl>";
print "<A HREF=\"mailto:freebsd-gnats-submit@freebsd.org,${email}?subject=Re: ${cat}/${number}: $syn\">Submit Followup</A>";
$syn =~ s/[\?&%"]/"%" . sprintf("%02X", unpack(C, $&))/eg;
$email =~ s/[\?&%]/"%" . sprintf("%02X", unpack(C, $&))/eg;
print "<A HREF=\"mailto:freebsd-gnats-submit@freebsd.org,${email}?subject=Re: ${cat}/${number}: $syn\">Submit Followup</A>\n";
print &html_footer;