From e43da19e34745d734ab6ee5cb5540e4d6e92adf3 Mon Sep 17 00:00:00 2001 From: Alex Arnaud Date: Tue, 5 Apr 2011 14:11:00 +0200 Subject: [PATCH] Bug #6044 - Authority is deleted when mergeto and mergefrom are the same MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Signed-off-by: Stéphane Delaune Signed-off-by: Chris Cormack --- misc/migration_tools/merge_authority.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/misc/migration_tools/merge_authority.pl b/misc/migration_tools/merge_authority.pl index 0987827981..b99591ffd6 100755 --- a/misc/migration_tools/merge_authority.pl +++ b/misc/migration_tools/merge_authority.pl @@ -97,7 +97,7 @@ if ($batch) { my $MARCto = GetAuthority($mergeto); &merge($mergefrom,$MARCfrom,$mergeto,$MARCto); #Could add mergefrom authority to mergeto rejected forms before deletion - DelAuthority($mergefrom); + DelAuthority($mergefrom) if ($mergefrom != $mergeto); } my $timeneeded = gettimeofday - $starttime; print "Done in $timeneeded seconds" unless $noconfirm; -- 2.39.5