[Koha-cvs] CVS: koha moremember.pl,1.11,1.12

[Chris Cormack]

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv19966

Modified Files:
	moremember.pl 
Log Message:
Fixing syntax error


Index: moremember.pl
===================================================================
RCS file: /cvsroot/koha/koha/moremember.pl,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -r1.11 -r1.12
*** moremember.pl	15 Apr 2002 16:17:21 -0000	1.11
--- moremember.pl	22 May 2002 04:30:44 -0000	1.12
***************
*** 229,233 ****
    <TD>$issue->[$i]{'date_due'}</td>";
    #find the charge for an item
!   my ($charge,$itemtype)=calc_charges(\%env,$issue->[$i]{'itemnumber'},$bornum);
    print "<TD>$itemtype</td>";
    print "<TD>$charge</td>";
--- 229,233 ----
    <TD>$issue->[$i]{'date_due'}</td>";
    #find the charge for an item
!   my ($charge,$itemtype)=calc_charges(undef,$issue->[$i]{'itemnumber'},$bornum);
    print "<TD>$itemtype</td>";
    print "<TD>$charge</td>";