Changeset 16392 for gsdl/trunk/perllib/plugins/OAIPlugin.pm

Timestamp:

2008-07-14T14:57:38+12:00 (16 years ago)

Author:

kjdon

Message:

global block pass: read_block is no more, use can_process_this_file to see whether a file is for us or not. extra arg (block_hash) to read, read_into_doc_obj, metadata_read etc

File:

• gsdl/trunk/perllib/plugins/OAIPlugin.pm (modified) (2 diffs)

gsdl/trunk/perllib/plugins/OAIPlugin.pm

@@ -162 +162 @@
     my $self = shift (@_);  
   
-    my ($pluginfo, $base_dir, $file, $metadata, $processor, $maxdocs, $total_count, $gli) = @_;
+    my ($pluginfo, $base_dir, $file, $block_hash, $metadata, $processor, $maxdocs, $total_count, $gli) = @_;
 
     my $outhandle = $self->{'outhandle'};
@@ -208 +208 @@
         
         return &plugin::read ($pluginfo, $filename_dir, $url_array->[0],
-                  $metadata, $processor, $maxdocs, $total_count, $gli);
+                  $block_hash, $metadata, $processor, $maxdocs,
+                  $total_count, $gli);
     }
     else