Fixed so renewing a rental item adds a charge

2001-05-09 23:23:52 +00:00 · 2001-05-09 23:23:52 +00:00 · 696c44c641
parent a254455342
commit 696c44c641
1 changed files with 1 additions and 0 deletions
--- a/renewscript.pl
+++ b/renewscript.pl
@ -30,6 +30,7 @@ while ( my ($key, $value) = each %data) {
     #means we want to renew this item
     #check its status
     my $status=renewstatus(\%env,$bornum,$key);
+#     print $status;
     if ($status == 1){
       renewbook(\%env,$bornum,$key);
     }