X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=misc%2Fmigration_tools%2F22_to_30%2Frebuild_unimarc_100.pl;h=1ef4049fbdbc1e419d149a542c43620d548e3a08;hb=3c41e9a60995651b68b174801a941099eb16206e;hp=60b1b878fe7db732789445c8cedb8f1b96846757;hpb=0b6c257717836734fddfbdda9cb2d2f6e6ae4e46;p=koha.git

diff --git a/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl b/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl
index 60b1b878fe..1ef4049fbd 100755
--- a/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl
+++ b/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl
@@ -30,7 +30,7 @@ while (my ($biblionumber,$time)=$sth->fetchrow ){
 # print "record : $biblionumber \n";
     my $record = GetMarcBiblio($biblionumber);
 # print "=> ".$record->as_formatted;
-    MARCmodrecord($biblionumber,$record,$time);
+    MARCmodrecord($biblionumber,$record,$time) if ($record);
 #
 }