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

(-)a/Koha/Patron.pm (-1 / +5 lines)
Lines 317-322 other lists are kept. Link Here
317
sub delete {
317
sub delete {
318
    my ($self) = @_;
318
    my ($self) = @_;
319
319
320
    unless ( $self->borrowernumber > 0 ) {
321
        Koha::Exceptions::CannotDeleteDefault->throw(
322
            { message => "Cannot delete system user" } );
323
    }
324
320
    my $deleted;
325
    my $deleted;
321
    $self->_result->result_source->schema->txn_do(
326
    $self->_result->result_source->schema->txn_do(
322
        sub {
327
        sub {
323
- 

Return to bug 22577