From 6175e505a56e36941bfde181b314d188d1ca004b Mon Sep 17 00:00:00 2001
From: rangi <rangi>
Date: Wed, 22 May 2002 04:30:44 +0000
Subject: [PATCH] Fixing syntax error

---
 moremember.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/moremember.pl b/moremember.pl
index be10f14a31..63f533f112 100755
--- a/moremember.pl
+++ b/moremember.pl
@@ -228,7 +228,7 @@ for (my $i=0;$i<$count;$i++){
   $issue->[$i]{'barcode'}</a></td>
   <TD>$issue->[$i]{'date_due'}</td>";
   #find the charge for an item
-  my ($charge,$itemtype)=calc_charges(\%env,$issue->[$i]{'itemnumber'},$bornum);
+  my ($charge,$itemtype)=calc_charges(undef,$issue->[$i]{'itemnumber'},$bornum);
   print "<TD>$itemtype</td>";
   print "<TD>$charge</td>";
 
-- 
2.39.5