Changeset 23377 for main/trunk

Timestamp:

2010-12-02T14:17:08+13:00 (13 years ago)

Author:

ak19

Message:

Perl syntax error fixed: referring to uninitialised variable metadata should have been self->metadata.

File:

• main/trunk/greenstone2/perllib/plugins/OpenDocumentPlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/OpenDocumentPlugin.pm

@@ -266 +266 @@
 
     my $plugin_filename_encoding = $self->{'filename_encoding'};
-    my $filename_encoding = $self->deduce_filename_encoding($file_only,$metadata,$plugin_filename_encoding);
+    my $filename_encoding = $self->deduce_filename_encoding($file_only,$self->{'metadata'},$plugin_filename_encoding);
 
     $self->set_Source_metadata($doc_obj, $filename, $filename_encoding);