|
Lines 1784-1794
sub AddIssue {
Link Here
|
| 1784 |
); |
1784 |
); |
| 1785 |
} |
1785 |
} |
| 1786 |
$issue->discard_changes; |
1786 |
$issue->discard_changes; |
|
|
1787 |
|
| 1787 |
#Update borrowers.lastseen |
1788 |
#Update borrowers.lastseen |
| 1788 |
try{ |
1789 |
try { |
| 1789 |
$patron->update_lastseen('check_out'); |
1790 |
$patron->update_lastseen('check_out'); |
| 1790 |
} |
1791 |
} catch { |
| 1791 |
catch { |
|
|
| 1792 |
my $exception = $_; |
1792 |
my $exception = $_; |
| 1793 |
warn "Problem updating lastseen date for borrowernumber " . $patron->borrowernumber . ": $exception"; |
1793 |
warn "Problem updating lastseen date for borrowernumber " . $patron->borrowernumber . ": $exception"; |
| 1794 |
}; |
1794 |
}; |
|
Lines 2589-2598
sub AddReturn {
Link Here
|
| 2589 |
if C4::Context->preference("ReturnLog"); |
2589 |
if C4::Context->preference("ReturnLog"); |
| 2590 |
|
2590 |
|
| 2591 |
#Update borrowers.lastseen |
2591 |
#Update borrowers.lastseen |
| 2592 |
try{ |
2592 |
try { |
| 2593 |
$patron->update_lastseen('check_in'); |
2593 |
$patron->update_lastseen('check_in'); |
| 2594 |
} |
2594 |
} catch { |
| 2595 |
catch { |
|
|
| 2596 |
my $exception = $_; |
2595 |
my $exception = $_; |
| 2597 |
warn "Problem updating lastseen date for borrowernumber " . $patron->borrowernumber . ": $exception"; |
2596 |
warn "Problem updating lastseen date for borrowernumber " . $patron->borrowernumber . ": $exception"; |
| 2598 |
$messages->{UpdateLastSeenError} = "$exception"; |
2597 |
$messages->{UpdateLastSeenError} = "$exception"; |
|
Lines 3544-3553
sub AddRenewal {
Link Here
|
| 3544 |
); |
3543 |
); |
| 3545 |
|
3544 |
|
| 3546 |
#Update borrowers.lastseen |
3545 |
#Update borrowers.lastseen |
| 3547 |
try{ |
3546 |
try { |
| 3548 |
$patron->update_lastseen('renewal'); |
3547 |
$patron->update_lastseen('renewal'); |
| 3549 |
} |
3548 |
} catch { |
| 3550 |
catch { |
|
|
| 3551 |
my $exception = $_; |
3549 |
my $exception = $_; |
| 3552 |
warn "Problem updating lastseen date for borrowernumber " . $patron->borrowernumber . ": $exception"; |
3550 |
warn "Problem updating lastseen date for borrowernumber " . $patron->borrowernumber . ": $exception"; |
| 3553 |
}; |
3551 |
}; |