View | Details | Raw Unified | Return to bug 18625
Collapse All | Expand All

(-)a/C4/SIP/ILS/Patron.pm (+19 lines)
Lines 433-438 sub charge_denied { Link Here
433
    return "Please contact library staff";
433
    return "Please contact library staff";
434
}
434
}
435
435
436
=head2 update_lastseen
437
438
    $patron->update_lastseen();
439
440
    Patron method to update lastseen field in borrower
441
    to record that patron has been seen via sip connection
442
443
=cut
444
445
sub update_lastseen {
446
    my $self = shift;
447
    my $p;
448
    if (C4::Context->preference('TrackLastPatronActivity')
449
        && $p = Koha::Patrons->find({ borrowernumber => $self->{borrowernumber} })) {
450
        $p->track_login;
451
    }
452
    return;
453
}
454
436
sub _get_address {
455
sub _get_address {
437
    my $patron = shift;
456
    my $patron = shift;
438
457
(-)a/C4/SIP/Sip/MsgType.pm (-1 / +1 lines)
Lines 932-937 sub handle_patron_info { Link Here
932
932
933
    $resp = (PATRON_INFO_RESP);
933
    $resp = (PATRON_INFO_RESP);
934
    if ($patron) {
934
    if ($patron) {
935
        $patron->update_lastseen();
935
        $resp .= patron_status_string($patron);
936
        $resp .= patron_status_string($patron);
936
        $resp .= ( defined($lang) and length($lang) == 3 ) ? $lang : $patron->language;
937
        $resp .= ( defined($lang) and length($lang) == 3 ) ? $lang : $patron->language;
937
        $resp .= timestamp();
938
        $resp .= timestamp();
938
- 

Return to bug 18625