Changeset 19497

Show
Ignore:
Timestamp:
18.05.2009 11:00:41 (10 years ago)
Author:
davidb
Message:

Introduction of new extrametafile to track which metadata.xml file a piece of metadata came from

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/plugin.pm

    r18441 r19497  
    232232 
    233233sub metadata_read { 
    234     my ($pluginfo, $base_dir, $file, $block_hash, $extrametakeys, $extrametadata, $processor, $maxdocs, $gli, $aux) = @_; 
     234    my ($pluginfo, $base_dir, $file, $block_hash,  
     235    $extrametakeys, $extrametadata, $extrametafile,  
     236    $processor, $maxdocs, $gli, $aux) = @_; 
    235237 
    236238    $maxdocs = -1 unless defined $maxdocs && $maxdocs =~ /\d/; 
     
    264266 
    265267    $rv = $plugobj->metadata_read($pluginfo, $base_dir, $file, $block_hash, 
    266                  $extrametakeys, $extrametadata, $processor, $maxdocs, $gli, $aux); 
     268                 $extrametakeys, $extrametadata, $extrametafile, 
     269                 $processor, $maxdocs, $gli, $aux); 
    267270 
    268271    if (defined $rv) {