unapi r1 complete!; using (fake) info uris
[Evergreen.git] / Open-ILS / src / perlmods / OpenILS / Application / SuperCat.pm
index d4ae0ba..d229b67 100644 (file)
@@ -238,7 +238,7 @@ sub retrieve_metarecord_mods {
                ->ownerDocument
                ->createElement("mods:recordIdentifier");
 
                ->ownerDocument
                ->createElement("mods:recordIdentifier");
 
-       $recordIdentifier->setAttribute( source => 'oils:/metabib-metarecord/' );
+       $recordIdentifier->setAttribute( source => 'info:oils/metabib-metarecord/' );
 
        my $id = $mr->id;
        $recordIdentifier->appendTextNode( $id );
 
        my $id = $mr->id;
        $recordIdentifier->appendTextNode( $id );
@@ -307,7 +307,7 @@ sub retrieve_metarecord_mods {
                        ->ownerDocument
                        ->createElement("mods:recordIdentifier");
 
                        ->ownerDocument
                        ->createElement("mods:recordIdentifier");
 
-               $subRecordIdentifier->setAttribute( source => 'oils:/biblio-record_entry/' );
+               $subRecordIdentifier->setAttribute( source => 'info:oils/biblio-record_entry/' );
 
                my $subid = $map->source;
                $subRecordIdentifier->appendTextNode( $subid );
 
                my $subid = $map->source;
                $subRecordIdentifier->appendTextNode( $subid );