From: oleonard <oleonard>
Date: Fri, 26 Nov 2004 20:24:38 +0000 (+0000)
Subject: Fix for Bug 848
X-Git-Tag: R_2_2_4~1130
X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=commitdiff_plain;h=3e29b81f64438a9c82646412c308d3557a332ce5;p=koha_fer

Fix for Bug 848
---

diff --git a/members/moremember.pl b/members/moremember.pl
index 6c997bf082..bcf56ecbc0 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -145,7 +145,7 @@ for (my $i=0;$i<$count;$i++){
 	# But &C4::Circulation::Renewals2::calc_charges doesn't appear to
 	# return the correct item type either (or a properly-formatted
 	# charge, for that matter).
-	my ($charge,$itemtype)=calc_charges(undef,$dbh,$issue->[$i]{'itemnumber'},$bornum);
+	my ($charge,$itemtype)=calc_charges($dbh,$issue->[$i]{'itemnumber'},$bornum);
 	$row{'itemtype'}=&ItemType($itemtype);
 	$row{'charge'}=$charge;