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