Lines 125-130
sub do_checkout {
Link Here
|
125 |
$debug and warn "do_checkout: calling AddIssue(\$borrower,$barcode, $overridden_duedate, 0)\n" |
125 |
$debug and warn "do_checkout: calling AddIssue(\$borrower,$barcode, $overridden_duedate, 0)\n" |
126 |
# . "w/ \$borrower: " . Dumper($borrower) |
126 |
# . "w/ \$borrower: " . Dumper($borrower) |
127 |
. "w/ C4::Context->userenv: " . Dumper(C4::Context->userenv); |
127 |
. "w/ C4::Context->userenv: " . Dumper(C4::Context->userenv); |
|
|
128 |
$self->{fee_amount} = GetIssuingCharges($itemnumber, $borrower); |
128 |
my $due_dt = AddIssue($borrower, $barcode, $overridden_duedate, 0); |
129 |
my $due_dt = AddIssue($borrower, $barcode, $overridden_duedate, 0); |
129 |
if ($due_dt) { |
130 |
if ($due_dt) { |
130 |
$self->{due} = $due_dt->clone(); |
131 |
$self->{due} = $due_dt->clone(); |
131 |
- |
|
|