minor fixes (odd/even lines bug)

This commit is contained in:
tipaul 2004-05-28 16:14:40 +00:00
parent bc2b9b7c6e
commit 1a5963a30a

View file

@ -244,8 +244,8 @@ sub catalogsearch {
$newline{biblionumber} = $oldbiblionumber;
my @CNresults2= @CNresults;
$newline{CN} = \@CNresults2;
$newline{'even'} = 1 if $counter % 2 == 0;
$newline{'odd'} = 1 if $counter % 2 == 1;
$newline{'even'} = 1 if $#finalresult % 2 == 0;
$newline{'odd'} = 1 if $#finalresult % 2 == 1;
@CNresults = ();
push @finalresult, \%newline;
$totalitems=0;