Fixed so renewing a rental item adds a charge
This commit is contained in:
parent
a254455342
commit
696c44c641
1 changed files with 1 additions and 0 deletions
|
@ -30,6 +30,7 @@ while ( my ($key, $value) = each %data) {
|
||||||
#means we want to renew this item
|
#means we want to renew this item
|
||||||
#check its status
|
#check its status
|
||||||
my $status=renewstatus(\%env,$bornum,$key);
|
my $status=renewstatus(\%env,$bornum,$key);
|
||||||
|
# print $status;
|
||||||
if ($status == 1){
|
if ($status == 1){
|
||||||
renewbook(\%env,$bornum,$key);
|
renewbook(\%env,$bornum,$key);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue