Lines 87-94
if ($op eq 'request'){
Link Here
|
87 |
my $recall = Koha::Recalls->find($recall_request->recall_id); |
87 |
my $recall = Koha::Recalls->find($recall_request->recall_id); |
88 |
# updating due date on checkout |
88 |
# updating due date on checkout |
89 |
my $timestamp = dt_from_string($recall->timestamp); |
89 |
my $timestamp = dt_from_string($recall->timestamp); |
90 |
my $due_date = $timestamp->add( $issuing_rule->lengthunit => $issuing_rule->recall_due_date_interval ); |
90 |
if ($issuing_rule->recall_due_date_interval eq '') { |
91 |
$checkout->update({ date_due => $due_date }); |
91 |
my $due_date = $timestamp->add( $issuing_rule->lengthunit => 0 ); |
|
|
92 |
} else { |
93 |
my $due_date = $timestamp->add( $issuing_rule->lengthunit => $issuing_rule->recall_due_date_interval); |
94 |
} |
95 |
my $checkout = Koha::Checkouts->find({ itemnumber = $itemnumber })->update({ date_due => $due_date }); |
92 |
my $checkout_borrower = $checkout->patron; |
96 |
my $checkout_borrower = $checkout->patron; |
93 |
|
97 |
|
94 |
# send notice to user with recalled item checked out |
98 |
# send notice to user with recalled item checked out |
95 |
- |
|
|