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

(-)a/C4/AuthoritiesMarc.pm (-2 / +1 lines)
Lines 709-715 sub DelAuthority { Link Here
709
    my $dbh=C4::Context->dbh;
709
    my $dbh=C4::Context->dbh;
710
710
711
    logaction( "AUTHORITIES", "DELETE", $authid, "authority" ) if C4::Context->preference("AuthoritiesLog");
711
    logaction( "AUTHORITIES", "DELETE", $authid, "authority" ) if C4::Context->preference("AuthoritiesLog");
712
    ModZebra($authid,"recordDelete","authorityserver",GetAuthority($authid),undef);
712
    ModZebra( $authid, "recordDelete", "authorityserver" );
713
    my $sth = $dbh->prepare("DELETE FROM auth_header WHERE authid=?");
713
    my $sth = $dbh->prepare("DELETE FROM auth_header WHERE authid=?");
714
    $sth->execute($authid);
714
    $sth->execute($authid);
715
}
715
}
716
- 

Return to bug 17980