taking out some warn statements....

This commit is contained in:
finlayt 2002-07-25 21:42:26 +00:00
parent 6eae239bb2
commit ee915e6d7c

View file

@ -81,8 +81,6 @@ EOF
my $existingreserves = "";
foreach my $res (sort {$a->{'found'} cmp $b->{'found'}} @$reserves){
#my $bor=$reserves->[$i]{'firstname'}."%20".$reserves->[$i]{'surname'};
#$bor=~ s/ /%20/g;
my $prioropt = priorityoptions($count, $res->{'priority'});
my $bropt = branchoptions($res->{'branchcode'});
warn $res->{'branchcode'};