changed the destination branch dropdown to only show branches that have
authorfinlayt <finlayt>
Tue, 7 May 2002 04:36:00 +0000 (04:36 +0000)
committerfinlayt <finlayt>
Tue, 7 May 2002 04:36:00 +0000 (04:36 +0000)
categorycode == CU, ie can be current branch.

circ/branchtransfers.pl

index ae2144e..32476dd 100755 (executable)
@@ -33,7 +33,7 @@ my $frbranchcd='';
 # set up the branchselect options....
 my $tobranchoptions;
 foreach my $br (keys %$branches) {
-    (next) if $branches->{$br}->{'PE'};
+    (next) unless $branches->{$br}->{'CU'};
     my $selected='';
     ($selected='selected') if ($br eq $tobranchcd);
     $tobranchoptions.="<option value=$br $selected>$branches->{$br}->{'branchname'}\n";