Changeset 17588

Timestamp:

2008-10-24T09:31:32+13:00 (15 years ago)

Author:

kjdon

Message:

OAIPlugin wasn't calling set_Source_metadata

File:

• gsdl/trunk/perllib/plugins/OAIPlugin.pm (modified) (1 diff)

gsdl/trunk/perllib/plugins/OAIPlugin.pm

@@ -263 +263 @@
     my $plugin_type = $self->{'plugin_type'};
     
+    my ($filemeta) = $file =~ /([^\\\/]+)$/;
+    $self->set_Source_metadata($doc_obj, $filemeta, $encoding);
     $doc_obj->add_utf8_metadata($top_section, "Language", $language);
     $doc_obj->add_utf8_metadata($top_section, "Encoding", $encoding);