@@ -, +, @@ --- authorities/merge.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) --- a/authorities/merge.pl +++ a/authorities/merge.pl @@ -66,9 +66,12 @@ if ($merge) { my $MARCfrom = GetAuthority( $recordid2 ); &merge( $recordid2, $MARCfrom, $recordid1, $record ); } else { + # What follows, is actually useless. Because our cron job cannot handle + # it adequately. But it does not harm either. Will just be ignored. + # FIXME Restructure need_merge_authorities on bug 9988 my $dbh = C4::Context->dbh; my $sqlinsert = "INSERT INTO need_merge_authorities (authid, done) VALUES (?,?)"; - $dbh->do( $sqlinsert, undef, ( $recordid1, 0 ) ); + $dbh->do( $sqlinsert, undef, ( $recordid2, 0 ) ); } # Deleting the other record --