From 9cb7b93c478083cee584acd8d19acbadea057593 Mon Sep 17 00:00:00 2001
From: David Gustafsson <david.gustafsson@ub.gu.se>
Date: Mon, 4 Apr 2022 16:41:00 +0200
Subject: [PATCH] Bug 29440: Fix QA-tool issues

---
 misc/migration_tools/bulkmarcimport.pl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/misc/migration_tools/bulkmarcimport.pl b/misc/migration_tools/bulkmarcimport.pl
index 627720cee4..b9e961c911 100755
--- a/misc/migration_tools/bulkmarcimport.pl
+++ b/misc/migration_tools/bulkmarcimport.pl
@@ -526,7 +526,7 @@ RECORD: foreach my $record (@{$marc_records}) {
                         next RECORD;
                     }
                     elsif (!$success) {
-                        warn "ERROR: Update biblio $matched_record_id failed for unkown reason";
+                        warn "ERROR: Update biblio $matched_record_id failed for unknown reason";
                         printlog( { id => $matched_record_id, op => "update", status => "ERROR" } ) if ($logfile);
                         next RECORD;
                     }
@@ -713,7 +713,6 @@ sub GetRecordId {
             return $marcrecord->subfield($tag, $subfield);
         }
     }
-    return undef;
 }
 sub build_query {
     my ($match, $record) = @_;
-- 
2.35.1