Changeset 31492 for main/trunk/greenstone2/perllib/plugins/ReadXMLFile.pm
- Timestamp:
- 2017-03-13T11:12:37+13:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/ReadXMLFile.pm
r28836 r31492 26 26 package ReadXMLFile; 27 27 28 use Base Plugin;28 use BaseImporter; 29 29 use doc; 30 30 use strict; … … 32 32 33 33 sub BEGIN { 34 @ReadXMLFile::ISA = ('Base Plugin');34 @ReadXMLFile::ISA = ('BaseImporter'); 35 35 unshift (@INC, "$ENV{'GSDLHOME'}/perllib/cpan"); 36 36 } … … 40 40 my $arguments = 41 41 [ { 'name' => "process_exp", 42 'desc' => "{Base Plugin.process_exp}",42 'desc' => "{BaseImporter.process_exp}", 43 43 'type' => "regexp", 44 44 'deft' => &get_default_process_exp(), … … 64 64 push(@{$hashArgOptLists->{"OptList"}},$options); 65 65 66 my $self = new Base Plugin($pluginlist, $inputargs, $hashArgOptLists);66 my $self = new BaseImporter($pluginlist, $inputargs, $hashArgOptLists); 67 67 68 68 if ($self->{'info_only'}) { … … 385 385 $self->set_Source_metadata($doc_obj, $filename_full_path, $filename_encoding); 386 386 387 # do we want other auto metadata here (see Base Plugin.read_into_doc_obj)387 # do we want other auto metadata here (see BaseImporter.read_into_doc_obj) 388 388 } 389 389 … … 392 392 my $doc_obj = $self->{'doc_obj'}; 393 393 394 # do we want other auto stuff here, see Base Plugin.read_into_doc_obj394 # do we want other auto stuff here, see BaseImporter.read_into_doc_obj 395 395 396 396 # include any metadata passed in from previous plugins
Note:
See TracChangeset
for help on using the changeset viewer.