X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=misc%2Fmigration_tools%2Fbuild_oai_sets.pl;h=00f92c8fe7d9899ee7383c71e30f0a3fb041618c;hb=9d6d641d1f8b77271800f43bc027b651f9aea52b;hp=c7b73a2d7d1e92b03bcf13c3e82cba17fbd5c4da;hpb=af7e41d1142573666d302a8475274ea58e5c99f4;p=srvgit diff --git a/misc/migration_tools/build_oai_sets.pl b/misc/migration_tools/build_oai_sets.pl index c7b73a2d7d..00f92c8fe7 100755 --- a/misc/migration_tools/build_oai_sets.pl +++ b/misc/migration_tools/build_oai_sets.pl @@ -39,14 +39,22 @@ oai_sets_mappings, and then fill table oai_sets_biblios with builded infos. use Modern::Perl; use MARC::Record; use MARC::File::XML; -use List::MoreUtils qw/uniq/; -use Getopt::Std; +use List::MoreUtils qw( uniq ); +use Getopt::Std qw( getopts ); use Koha::Script; use C4::Context; -use C4::Charset qw/StripNonXmlChars/; +use C4::Charset qw( StripNonXmlChars ); use C4::Biblio; -use C4::OAI::Sets; +use C4::OAI::Sets qw( + AddOAISetsBiblios + CalcOAISetsBiblio + GetOAISet + GetOAISetBySpec + GetOAISets + GetOAISetsMappings + ModOAISetsBiblios +); my %opts; $Getopt::Std::STANDARD_HELP_VERSION = 1;