|
Lines 443-449
sub delete {
Link Here
|
| 443 |
Koha::Exceptions::Patron::FailedDeleteAnonymousPatron->throw() if $anonymous_patron && $self->id eq $anonymous_patron; |
443 |
Koha::Exceptions::Patron::FailedDeleteAnonymousPatron->throw() if $anonymous_patron && $self->id eq $anonymous_patron; |
| 444 |
|
444 |
|
| 445 |
# Check if patron is protected |
445 |
# Check if patron is protected |
| 446 |
Koha::Exceptions::Patron::FailedDeleteProtectedPatron->throw() if $self->protected == 1; |
446 |
Koha::Exceptions::Patron::FailedDeleteProtectedPatron->throw() if defined $self->protected && $self->protected == 1; |
| 447 |
|
447 |
|
| 448 |
$self->_result->result_source->schema->txn_do( |
448 |
$self->_result->result_source->schema->txn_do( |
| 449 |
sub { |
449 |
sub { |
| 450 |
- |
|
|