Code cleaning of Biblio.pm (continued)

[koha_gimpoz] / misc / migration_tools / 22_to_30 / rebuild_leader.pl

diff --git a/misc/migration_tools/22_to_30/rebuild_leader.pl b/misc/migration_tools/22_to_30/rebuild_leader.pl
index e1bc08d..7a0b789 100644 (file)
--- a/misc/migration_tools/22_to_30/rebuild_leader.pl
+++ b/misc/migration_tools/22_to_30/rebuild_leader.pl
@@ -42,7 +42,7 @@ foreach ($record->field('995')) {
        $record->delete_field($_);
 }
 if ($update){  
-       &MARCmodbiblio($dbh,$biblionumber,$record,'',0);
+       &ModBiblioMarc($record,'',$biblionumber);
        print "$biblionumber \n";       
 }