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

(-)a/misc/migration_tools/remove_unused_authorities.pl (-2 / +1 lines)
Lines 95-101 while (my $data=$rqselect->fetchrow_hashref){ Link Here
95
    }
95
    }
96
    unless ($used > 0){
96
    unless ($used > 0){
97
        unless ($test) {
97
        unless ($test) {
98
            DelAuthority({ authid => $data->{'authid'} });
98
            DelAuthority({ authid => $data->{'authid'}, skip_merge => 1 });
99
            print " : deleted";
99
            print " : deleted";
100
        } else {
100
        } else {
101
            print " : can be deleted";
101
            print " : can be deleted";
102
- 

Return to bug 26337