Show
Ignore:
Timestamp:
18.05.2009 10:57:05 (11 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/plugins/SplitTextFile.pm

    r18327 r19493  
    118118sub metadata_read { 
    119119    my $self = shift (@_);   
    120     my ($pluginfo, $base_dir, $file, $block_hash, $extrametakeys, $extrametadata, $processor, $maxdocs, $gli) = @_; 
     120    my ($pluginfo, $base_dir, $file, $block_hash,  
     121    $extrametakeys, $extrametadata, $extrametafile, 
     122    $processor, $maxdocs, $gli) = @_; 
    121123 
    122124    # returns 1 if matches process_exp, and has done blocking in the meantime 
     
    124126                          $block_hash,  
    125127                          $extrametakeys,  
    126                           $extrametadata, $processor,  
    127                           $maxdocs, $gli); 
     128                          $extrametadata,  
     129                          $extrametafile, 
     130                          $processor, $maxdocs, $gli); 
    128131    my $split_matched = undef; 
    129132