Changeset 22294

Show
Ignore:
Timestamp:
23.06.2010 14:48:46 (9 years ago)
Author:
kjdon
Message:

when asking for a piece of metadata, want to remove ex. from the ones we are searching through. Some metadata will be stored internally as ex., eg ex.File.MIMEType from EmbeddedMetadataPlugin?. But this is equivalent to File.MIMEType

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/doc.pm

    r21862 r22294  
    729729        $data_name =~ s/^\w*\.//; 
    730730    } 
    731      
     731    $data_name =~ s/^ex\.//; # we always remove ex. - it maybe there in doc_obj, but we will never ask for it. 
    732732    return $data->[1] if (scalar(@$data) >= 2 && $data_name eq $field); 
    733733    } 
     
    764764        $data_name =~ s/^\w*\.//; 
    765765    } 
    766  
     766    $data_name =~ s/^ex\.//; # we always remove ex. - it maybe there in doc_obj, but we will never ask for it. 
    767767        push (@metadata, $data->[1]) if ($data_name eq $field); 
    768768    }