Changeset 23348

Timestamp:

2010-11-26T11:32:42+13:00 (13 years ago)

Author:

davidb

Message:

Added extra parameter to call to deduce_filename_encoding()

File:

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

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

@@ -141 +141 @@
     $doc_obj->add_utf8_metadata($top_section, "FileSize", (-s $filename_full_path));
 
-    my $filename_encoding = $self->deduce_filename_encoding($file,$metadata);
+    my $plugin_filename_encoding = $self->{'filename_encoding'};
+    my $filename_encoding = $self->deduce_filename_encoding($file,$metadata,$plugin_filename_encoding);
     $self->set_Source_metadata($doc_obj, $filename_no_path, $filename_encoding);