Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Patch by Andrew Anderson <andrew@redhat.com>. Many minor bugfixes and cleanup.

Browse Source 
git-svn-id: svn://10.0.0.236/trunk@14745 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
terry%netscape.com
1998-11-16 19:43:50 +00:00
parent bff62c7d82
commit d96970ce3c
17 changed files with 267 additions and 237 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
mozilla/webtools/bugzilla/colchange.cgi
View File

@@ -24,8 +24,6 @@ use strict;
require "CGI.pl";
print "Content-type: text/html\n";
# The master list not only says what fields are possible, but what order
# they get displayed in.
@@ -49,8 +47,8 @@ if (defined $::FORM{'rememberedquery'}) {
my $list = join(" ", @collist);
print "Set-Cookie: COLUMNLIST=$list ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n";
print "Refresh: 0; URL=buglist.cgi?$::FORM{'rememberedquery'}\n";
print "\n";
print "<TITLE>What a hack.</TITLE>\n";
print "Content-type: text/html\n\n";
PutHeader("What a hack");
print "Resubmitting your query with new columns...\n";
exit;
}
@@ -61,6 +59,9 @@ if (defined $::COOKIE{'COLUMNLIST'}) {
@collist = @::default_column_list;
}
print "Content-type: text/html\n\n";
PutHeader("Column Change");
my %desc;
foreach my $i (@masterlist) {
@@ -71,12 +72,11 @@ $desc{'summary'} = "Summary (first 60 characters)";
$desc{'summaryfull'} = "Full Summary";
print "\n";
print "Check which columns you wish to appear on the list, and then click\n";
print "on submit.\n";
print "<p>\n";
print "<FORM ACTION=colchange.cgi>\n";
print "<INPUT TYPE=HIDDEN NAME=rememberedquery VALUE=$::buffer>\n";
print "<FORM ACTION=\"colchange.cgi\">\n";
print "<INPUT TYPE=\"HIDDEN\" NAME=\"rememberedquery\" VALUE=\"$::buffer\">\n";
foreach my $i (@masterlist) {
my $c;
@@ -85,13 +85,13 @@ foreach my $i (@masterlist) {
} else {
$c = '';
}
print "<INPUT TYPE=checkbox NAME=column_$i $c>$desc{$i}<br>\n";
print "<INPUT TYPE=\"checkbox\" NAME=\"column_$i\" $c>$desc{$i}<br>\n";
}
print "<P>\n";
print "<INPUT TYPE=\"submit\" VALUE=\"Submit\">\n";
print "</FORM>\n";
print "<FORM ACTION=colchange.cgi>\n";
print "<INPUT TYPE=HIDDEN NAME=rememberedquery VALUE=$::buffer>\n";
print "<INPUT TYPE=HIDDEN NAME=resetit VALUE=1>\n";
print "<FORM ACTION=\"colchange.cgi\">\n";
print "<INPUT TYPE=\"HIDDEN\" NAME=\"rememberedquery\" VALUE=\"$::buffer\">\n";
print "<INPUT TYPE=\"HIDDEN\" NAME=\"resetit\" VALUE=\"1\">\n";
print "<INPUT TYPE=\"submit\" VALUE=\"Reset to Bugzilla default\">\n";
print "</FORM>\n";