my $query = new CGI;
my $member = $query->param('nm'); $member =~ s/[^a-zA-Z0-9_ -]//g;
-my $branch = $query->param('br'); $branch =~ s/[^a-zA-Z0-9_ .-]//g;
+my $branch = $query->param('br'); $branch =~ s/[^a-zA-Z0-9+_ .-]//g;
my $hm = $query->param('hm'); $hm =~ s/[^a-zA-Z0-9_ -]//g;
$hm = '240' unless $hm =~ /^\d+$/;
[% END %]
<tr [% PROCESS cl bgfor=row.stage %]>
<td [% PROCESS cl bgfor=row.current_stage %]><a
- href="show_history.pl?nm=[% row.sysname %]&br=[% row.branch %]"
+ href="show_history.pl?nm=[% row.sysname %]&br=[% row.branch | uri %]"
title="History"
>[% row.sysname %]</a></td>
<td>[% PROCESS sysnotes %]</td>
</tr>
<tr>
<td>[% system %]</td>
- <td><a href="/cgi-bin/show_history.pl?nm=[% system %]&br=[% branch %]">[% branch %]</a></td>
+ <td><a href="/cgi-bin/show_history.pl?nm=[% system %]&br=[% branch | uri %]">[% branch %]</a></td>
<td>[% info_row.operating_system %] [% info_row.os_version %]</td>
<td>[% info_row.compiler %] [% info_row.compiler_version %]</td>
<td>[% info_row.architecture %]</td>
[% END %]
<tr [% PROCESS cl bgfor=row.stage %]>
<td><a
- href="show_history.pl?nm=[% row.sysname %]&br=[% row.branch %]"
+ href="show_history.pl?nm=[% row.sysname %]&br=[% row.branch | uri %]"
title="History"
>[% row.sysname %]</a></td>
<td>[% PROCESS sysnotes %]</td>