Changeset 23349 for main/trunk/greenstone2/perllib/plugins/OAIPlugin.pm
- Timestamp:
- 2010-11-26T12:09:53+13:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/OAIPlugin.pm
r23212 r23349 297 297 298 298 my ($filemeta) = $file =~ /([^\\\/]+)$/; 299 $self->set_Source_metadata($doc_obj, $filemeta, $encoding); 299 my $plugin_filename_encoding = $self->{'filename_encoding'}; 300 my $filename_encoding = $self->deduce_filename_encoding($file,$metadata,$plugin_filename_encoding); 301 $self->set_Source_metadata($doc_obj, $filemeta, $filename_encoding); 302 300 303 $doc_obj->add_utf8_metadata($top_section, "Language", $language); 301 304 $doc_obj->add_utf8_metadata($top_section, "Encoding", $encoding);
Note:
See TracChangeset
for help on using the changeset viewer.