aboutsummaryrefslogtreecommitdiffstats
path: root/colchange.cgi
diff options
context:
space:
mode:
authorkiko%async.com.br <>2004-04-02 07:44:22 +0000
committerkiko%async.com.br <>2004-04-02 07:44:22 +0000
commitdb31bf41614491171c5e8da23e21d64134e366c7 (patch)
treed1003b74114855ae9cf3dbf6b866c01bf09f5b88 /colchange.cgi
parent4ebec21908947431eb931a7440e06eab8cf41725 (diff)
downloadbugs-db31bf41614491171c5e8da23e21d64134e366c7.tar
bugs-db31bf41614491171c5e8da23e21d64134e366c7.tar.gz
bugs-db31bf41614491171c5e8da23e21d64134e366c7.tar.bz2
bugs-db31bf41614491171c5e8da23e21d64134e366c7.tar.xz
bugs-db31bf41614491171c5e8da23e21d64134e366c7.zip
Fix for bug 238874: remove %FORM and %COOKIE from colchange.cgi. Does
precisely that, swapping them for references to cgi->param/cookie. r=vladd, justdave, a=justdave.
Diffstat (limited to 'colchange.cgi')
-rwxr-xr-xcolchange.cgi18
1 files changed, 9 insertions, 9 deletions
diff --git a/colchange.cgi b/colchange.cgi
index dcd611dad..f7f68c2c0 100755
--- a/colchange.cgi
+++ b/colchange.cgi
@@ -77,18 +77,18 @@ push(@masterlist, ("short_desc", "short_short_desc"));
$vars->{'masterlist'} = \@masterlist;
my @collist;
-if (defined $::FORM{'rememberedquery'}) {
+if (defined $cgi->param('rememberedquery')) {
my $splitheader = 0;
- if (defined $::FORM{'resetit'}) {
+ if (defined $cgi->param('resetit')) {
@collist = @::default_column_list;
} else {
foreach my $i (@masterlist) {
- if (defined $::FORM{"column_$i"}) {
+ if (defined $cgi->param("column_$i")) {
push @collist, $i;
}
}
- if (exists $::FORM{'splitheader'}) {
- $splitheader = $::FORM{'splitheader'};
+ if (defined $cgi->param('splitheader')) {
+ $splitheader = $cgi->param('splitheader');
}
}
my $list = join(" ", @collist);
@@ -98,11 +98,11 @@ if (defined $::FORM{'rememberedquery'}) {
-value => $list,
-expires => 'Fri, 01-Jan-2038 00:00:00 GMT');
$cgi->send_cookie(-name => 'SPLITHEADER',
- -value => $::FORM{'splitheader'},
+ -value => $cgi->param('splitheader'),
-expires => 'Fri, 01-Jan-2038 00:00:00 GMT');
$vars->{'message'} = "change_columns";
- $vars->{'redirect_url'} = "buglist.cgi?$::FORM{'rememberedquery'}";
+ $vars->{'redirect_url'} = "buglist.cgi?".$cgi->param('rememberedquery');
# If we're running on Microsoft IIS, using cgi->redirect discards
# the Set-Cookie lines -- workaround is to use the old-fashioned
@@ -119,8 +119,8 @@ if (defined $::FORM{'rememberedquery'}) {
exit;
}
-if (defined $::COOKIE{'COLUMNLIST'}) {
- @collist = split(/ /, $::COOKIE{'COLUMNLIST'});
+if (defined $cgi->cookie('COLUMNLIST')) {
+ @collist = split(/ /, $cgi->cookie('COLUMNLIST'));
} else {
@collist = @::default_column_list;
}