From 8b725463c37f431d33489d6e48542d9a4d4be906 Mon Sep 17 00:00:00 2001
From: "terry%mozilla.org" <>
Date: Fri, 4 Feb 2000 22:07:58 +0000
Subject: Add an optional ability to stagger the headers in the bug list, which
is uglier, but often squeezes things better horizontally.
---
colchange.cgi | 16 ++++++++++++++++
1 file changed, 16 insertions(+)
(limited to 'colchange.cgi')
diff --git a/colchange.cgi b/colchange.cgi
index 0cedd515e..2d145955b 100755
--- a/colchange.cgi
+++ b/colchange.cgi
@@ -56,6 +56,7 @@ push(@masterlist, ("summary", "summaryfull"));
my @collist;
if (defined $::FORM{'rememberedquery'}) {
+ my $splitheader = 0;
if (defined $::FORM{'resetit'}) {
@collist = @::default_column_list;
} else {
@@ -64,9 +65,13 @@ if (defined $::FORM{'rememberedquery'}) {
push @collist, $i;
}
}
+ if (exists $::FORM{'splitheader'}) {
+ $splitheader = $::FORM{'splitheader'};
+ }
}
my $list = join(" ", @collist);
print "Set-Cookie: COLUMNLIST=$list ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n";
+ print "Set-Cookie: SPLITHEADER=$::FORM{'splitheader'} ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n";
print "Refresh: 0; URL=buglist.cgi?$::FORM{'rememberedquery'}\n";
print "\n";
print "What a hack.\n";
@@ -81,6 +86,11 @@ if (defined $::COOKIE{'COLUMNLIST'}) {
@collist = @::default_column_list;
}
+my $splitheader = 0;
+if ($::COOKIE{'SPLITHEADER'}) {
+ $splitheader = 1;
+}
+
my %desc;
foreach my $i (@masterlist) {
@@ -109,6 +119,12 @@ foreach my $i (@masterlist) {
print "$desc{$i}
\n";
}
print "\n";
+print BuildPulldown("splitheader",
+ [["0", "Normal headers (prettier)"],
+ ["1", "Stagger headers (often makes list more compact)"]],
+ $splitheader);
+print "
\n";
+
print "\n";
print "\n";
print "