From b0abf65c31ced006e4134bc4533d4d3b7509aeba Mon Sep 17 00:00:00 2001 From: tipaul Date: Mon, 5 Mar 2007 16:07:32 +0000 Subject: [PATCH] BUGFIX : $1 instead of $i (bug does not exist in rel_3_0) --- readingrec.pl | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/readingrec.pl b/readingrec.pl index ac34db6c92..34c7fd5b92 100755 --- a/readingrec.pl +++ b/readingrec.pl @@ -72,13 +72,13 @@ for (my $i=0;$i<$count;$i++){ $line{date_due}=format_date($issues->[$i]->{'date_due'}); $line{returndate}=format_date($issues->[$i]->{'returndate'}); $line{volumeddesc}=$issues->[$i]->{'volumeddesc'}; - $line{volume} =$issues->[$1]->{'volume'}; - $line{publicationyear} =$issues->[$1]->{'publicationyear'}; - $line{publishercode} =$issues->[$1]->{'publishercode'}; - $line{place} =$issues->[$1]->{'place'}; - $line{pages} =$issues->[$1]->{'pages'}; - $line{size} =$issues->[$1]->{'size'}; - $line{description} =$issues->[$1]->{'description'}; + $line{volume} =$issues->[$i]->{'volume'}; + $line{publicationyear} =$issues->[$i]->{'publicationyear'}; + $line{publishercode} =$issues->[$i]->{'publishercode'}; + $line{place} =$issues->[$i]->{'place'}; + $line{pages} =$issues->[$i]->{'pages'}; + $line{size} =$issues->[$i]->{'size'}; + $line{description} =$issues->[$i]->{'description'}; push(@loop_reading,\%line); } -- 2.39.5