Bug 8015: (follow-up) fix copy and move if subfields don't exist.

[koha.git] / opac / oai.pl

diff --git a/opac/oai.pl b/opac/oai.pl
index 7aa5a7d..b453408 100755 (executable)
--- a/opac/oai.pl
+++ b/opac/oai.pl
@@ -89,7 +89,7 @@ sub new {
     my ($metadata_prefix, $offset, $from, $until, $set);
     if ( $args{ resumptionToken } ) {
         ($metadata_prefix, $offset, $from, $until, $set)
-            = split( ':', $args{resumptionToken} );
+            = split( '/', $args{resumptionToken} );
     }
     else {
         $metadata_prefix = $args{ metadataPrefix };
@@ -110,7 +110,7 @@ sub new {
     $self->{ set             } = $set;
 
     $self->resumptionToken(
-        join( ':', $metadata_prefix, $offset, $from, $until, $set ) );
+        join( '/', $metadata_prefix, $offset, $from, $until, $set ) );
     $self->cursor( $offset );
 
     return $self;