use Modern::Perl;
use HTTP::OAI;
-use C4::Biblio;
-use C4::OAI::Sets;
+use C4::OAI::Sets qw( GetOAISetsBiblio );
use MARC::File::XML;
use base ("HTTP::OAI::GetRecord");
{
return HTTP::OAI::Response->new(
requestURL => $repository->self_url(),
- errors => [ new HTTP::OAI::Error(
+ errors => [ HTTP::OAI::Error->new(
code => 'idDoesNotExist',
message => "There is no biblio record with this identifier",
) ],