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

(-)a/C4/AuthoritiesMarc.pm (-1 / +1 lines)
Lines 682-688 sub AddAuthority { Link Here
682
682
683
=head2 DelAuthority
683
=head2 DelAuthority
684
684
685
  $authid = DelAuthority( $authid )
685
    DelAuthority( $authid )
686
686
687
Deletes $authid and calls merge to cleanup in linked biblio records
687
Deletes $authid and calls merge to cleanup in linked biblio records
688
688
(-)a/C4/ImportBatch.pm (-1 / +1 lines)
Lines 852-858 sub BatchRevertRecords { Link Here
852
                $num_items_deleted += BatchRevertItems($rowref->{'import_record_id'}, $rowref->{'matched_biblionumber'});
852
                $num_items_deleted += BatchRevertItems($rowref->{'import_record_id'}, $rowref->{'matched_biblionumber'});
853
                $error = DelBiblio($rowref->{'matched_biblionumber'});
853
                $error = DelBiblio($rowref->{'matched_biblionumber'});
854
            } else {
854
            } else {
855
                my $deletedauthid = DelAuthority($rowref->{'matched_authid'});
855
                DelAuthority( $rowref->{'matched_authid'} );
856
            }
856
            }
857
            if (defined $error) {
857
            if (defined $error) {
858
                $num_errors++;
858
                $num_errors++;
(-)a/tools/batch_delete_records.pl (-3 / +2 lines)
Lines 198-205 if ( $op eq 'form' ) { Link Here
198
        } else {
198
        } else {
199
            # Authorities
199
            # Authorities
200
            my $authid = $record_id;
200
            my $authid = $record_id;
201
            my $r = eval { C4::AuthoritiesMarc::DelAuthority( $authid ) };
201
            eval { C4::AuthoritiesMarc::DelAuthority( $authid ) };
202
            if ( $r eq '0E0' or $@ ) {
202
            if ( $@ ) {
203
                push @messages, {
203
                push @messages, {
204
                    type => 'error',
204
                    type => 'error',
205
                    code => 'authority_not_deleted',
205
                    code => 'authority_not_deleted',
206
- 

Return to bug 18070