From ea7cae2b9314e005ec58ff9fa96459bed79e7cf4 Mon Sep 17 00:00:00 2001 From: finlayt Date: Fri, 9 Aug 2002 04:33:01 +0000 Subject: [PATCH] I have changed the branch options to only include the Issueing branches. Also if no branch is set it Defaults to Levin. --- request.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/request.pl b/request.pl index 27d0eda9d8..b7afa861fb 100755 --- a/request.pl +++ b/request.pl @@ -34,9 +34,8 @@ my $priorityoptions = priorityoptions($num, $num); # get branch information my $branch = $input->cookie('branch'); +($branch) || ($branch = 'L'); my $branches = getbranches(); - - my $branchoptions = branchoptions($branch); @@ -154,7 +153,7 @@ sub branchoptions { my ($selbr) = @_; my $out = ""; foreach my $br (keys %$branches) { - (next) unless $branches->{$br}->{'CU'}; + (next) unless $branches->{$br}->{'IS'}; my $selected = ""; if ($br eq $selbr) { $selected = "selected"; -- 2.39.5