Changeset 24547 for main/trunk/greenstone2/perllib/plugins/OAIPlugin.pm
- Timestamp:
- 2011-09-02T16:28:57+12:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/OAIPlugin.pm
r24404 r24547 36 36 use ReadTextFile; # needed for subroutine textcat_get_language_encoding 37 37 use metadatautil; 38 38 use MetadataRead; 39 40 # methods with identical signatures take precedence in the order given in the ISA list. 39 41 sub BEGIN { 40 @OAIPlugin::ISA = (' ReadXMLFile', 'ReadTextFile');42 @OAIPlugin::ISA = ('MetadataRead', 'ReadXMLFile', 'ReadTextFile'); 41 43 } 42 44 … … 183 185 $self->{'metadata_xml'} .= $_; 184 186 } 185 }186 187 sub can_process_this_file_for_metadata {188 my $self = shift(@_);189 190 return $self->can_process_this_file(@_);191 187 } 192 188
Note:
See TracChangeset
for help on using the changeset viewer.