- Timestamp:
- 2017-03-13T11:12:37+13:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/MetadataCSVPlugin.pm
r31480 r31492 28 28 29 29 30 use Base Plugin;30 use BaseImporter; 31 31 use MetadataRead; 32 32 … … 42 42 # methods with identical signatures take precedence in the order given in the ISA list. 43 43 sub BEGIN { 44 @MetadataCSVPlugin::ISA = ('MetadataRead', 'Base Plugin');44 @MetadataCSVPlugin::ISA = ('MetadataRead', 'BaseImporter'); 45 45 } 46 46 … … 48 48 my $arguments = [ 49 49 { 'name' => "process_exp", 50 'desc' => "{Base Plugin.process_exp}",50 'desc' => "{BaseImporter.process_exp}", 51 51 'type' => "regexp", 52 52 'reqd' => "no", … … 72 72 push(@{$hashArgOptLists->{"OptList"}},$options); 73 73 74 my $self = new Base Plugin($pluginlist, $inputargs, $hashArgOptLists);74 my $self = new BaseImporter($pluginlist, $inputargs, $hashArgOptLists); 75 75 76 76 return bless $self, $class;
Note:
See TracChangeset
for help on using the changeset viewer.