@@ -, +, @@ --- .../prog/en/xslt/UNIMARCslim2OAIDC.xsl | 2 +- opac/oai.pl | 21 +++++++++++-------- 2 files changed, 13 insertions(+), 10 deletions(-) --- a/koha-tmpl/intranet-tmpl/prog/en/xslt/UNIMARCslim2OAIDC.xsl +++ a/koha-tmpl/intranet-tmpl/prog/en/xslt/UNIMARCslim2OAIDC.xsl @@ -165,7 +165,7 @@ - http://opac.mylibrary.org/bib/ + /bib/ --- a/opac/oai.pl +++ a/opac/oai.pl @@ -200,16 +200,19 @@ sub new { my $self = $class->SUPER::new(%args); $timestamp =~ s/ /T/, $timestamp .= 'Z'; - $self->header( new HTTP::OAI::Header( - identifier => $args{identifier}, - datestamp => $timestamp, - ) ); - - my $parser = XML::LibXML->new(); - my $record_dom = $parser->parse_string( $marcxml ); - my $format = $args{metadataPrefix}; + $self->header( + new HTTP::OAI::Header( + identifier => $args{identifier}, + datestamp => $timestamp, + ) + ); + + my $parser = XML::LibXML->new(); + my $record_dom = $parser->parse_string($marcxml); + my $format = $args{metadataPrefix}; + my $syspref = C4::Context->preference("OPACBaseURL"); if ( $format ne 'marcxml' ) { - $record_dom = $repository->stylesheet($format)->transform( $record_dom ); + $record_dom = $repository->stylesheet($format)->transform($record_dom, syspref=> $syspref); } $self->metadata( HTTP::OAI::Metadata->new( dom => $record_dom ) ); --