Lines 82-89
sub delete {
Link Here
|
82 |
# FIXME Could be $patron->get_lists |
82 |
# FIXME Could be $patron->get_lists |
83 |
$_->delete for Koha::Virtualshelves->search( { owner => $self->borrowernumber } ); |
83 |
$_->delete for Koha::Virtualshelves->search( { owner => $self->borrowernumber } ); |
84 |
|
84 |
|
85 |
logaction( "MEMBERS", "DELETE", $self->borrowernumber, "" ) if C4::Context->preference("BorrowersLog"); |
|
|
86 |
$deleted = $self->SUPER::delete; |
85 |
$deleted = $self->SUPER::delete; |
|
|
86 |
|
87 |
logaction( "MEMBERS", "DELETE", $self->borrowernumber, "" ) if C4::Context->preference("BorrowersLog"); |
87 |
} |
88 |
} |
88 |
); |
89 |
); |
89 |
return $deleted; |
90 |
return $deleted; |
90 |
- |
|
|