- Timestamp:
- 2017-03-13T11:12:37+13:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/EmbeddedMetadataPlugin.pm
r31474 r31492 28 28 package EmbeddedMetadataPlugin; 29 29 30 use Base Plugin;30 use BaseImporter; 31 31 use extrametautil; 32 32 use util; … … 41 41 sub BEGIN 42 42 { 43 @EmbeddedMetadataPlugin::ISA = ('Base Plugin');43 @EmbeddedMetadataPlugin::ISA = ('BaseImporter'); 44 44 binmode(STDERR, ":utf8"); 45 45 } … … 48 48 'name' => "auto", 49 49 'desc' => "{ReadTextFile.input_encoding.auto}" }]; 50 push(@{$encoding_plus_auto_list},@{$ EncodingUtil::encoding_list});50 push(@{$encoding_plus_auto_list},@{$CommonUtil::encoding_list}); 51 51 52 52 my $arguments = [{ … … 104 104 if(defined $options) { push(@{$hashArgOptLists->{"OptList"}},$options)}; 105 105 106 my $self = new Base Plugin($pluginlist, $inputargs, $hashArgOptLists);106 my $self = new BaseImporter($pluginlist, $inputargs, $hashArgOptLists); 107 107 108 108 # Create a new Image::ExifTool object
Note:
See TracChangeset
for help on using the changeset viewer.