X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=misc%2Fmigration_tools%2F22_to_30%2Fmissing090field.pl;h=80861b186530f3a54c219c740ab38488bd3f60ad;hb=9d6d641d1f8b77271800f43bc027b651f9aea52b;hp=b54bf9285d103e3c02077823508e5e894f584f53;hpb=af7e41d1142573666d302a8475274ea58e5c99f4;p=srvgit diff --git a/misc/migration_tools/22_to_30/missing090field.pl b/misc/migration_tools/22_to_30/missing090field.pl index b54bf9285d..80861b1865 100755 --- a/misc/migration_tools/22_to_30/missing090field.pl +++ b/misc/migration_tools/22_to_30/missing090field.pl @@ -7,15 +7,14 @@ use strict; BEGIN { # find Koha's Perl modules # test carefully before changing this - use FindBin; + use FindBin (); eval { require "$FindBin::Bin/../../kohalib.pl" }; } # Koha modules used use C4::Context; -use C4::Biblio; -use MARC::Record; +use C4::Biblio qw( GetMarcBiblio GetMarcFromKohaField ModBiblioMarc ); use MARC::File::USMARC; $|=1;