[Koha-cvs] koha/bull statecollection.pl [rel_2_2]

[Henri-Damien LAURENT]

CVSROOT:	/cvsroot/koha
Module name:	koha
Branch: 	rel_2_2
Changes by:	Henri-Damien LAURENT <hdl at savannah.gnu.org>	06/03/07 14:48:01

Modified files:
	bull           : statecollection.pl 

Log message:
	Bug Fixing : Internal server error when no location list nor itemstatus

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/bull/statecollection.pl.diff?only_with_tag=rel_2_2&tr1=1.3.2.14&tr2=1.3.2.15&r1=text&r2=text

Patches:
Index: koha/bull/statecollection.pl
diff -u koha/bull/statecollection.pl:1.3.2.14 koha/bull/statecollection.pl:1.3.2.15
--- koha/bull/statecollection.pl:1.3.2.14	Mon Feb 27 15:52:16 2006
+++ koha/bull/statecollection.pl	Tue Mar  7 14:48:00 2006
@@ -122,8 +122,10 @@
 		push @itemlocationloop, \%row;
 	}
 	foreach my $data (@serialslist){
-		$data->{"itemstatusloop"}=\@itemstatusloop if (scalar(@itemstatusloop));
-		$data->{"itemlocationloop"}=\@itemlocationloop if (scalar(@itemlocationloop));
+		if (scalar(@itemstatusloop)){$data->{"itemstatusloop"}=\@itemstatusloop;}
+		else { $data->{"itemstatusloop"}=[];}
+		if (scalar(@itemlocationloop)){$data->{"itemlocationloop"}=\@itemlocationloop;}
+		else {$data->{"itemlocationloop"}=[];}
 		$data->{"branchloop"}=\@branchloop ;
 	}
 	$template->param(serialadditems =>C4::Context->preference("serialsadditems"),