Changeset 18327 for gsdl/trunk/perllib/plugins/ReadXMLFile.pm

Timestamp:

2009-01-07T17:59:22+13:00 (15 years ago)

Author:

ak19

Message:

Extra parameter to new doc(): the renaming method to be used on the file (base64 or URL encoding).

File:

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

gsdl/trunk/perllib/plugins/ReadXMLFile.pm

@@ -368 +368 @@
 
     # create a new document
-    $self->{'doc_obj'} = new doc ($self->{'filename'}, "indexed_doc");
+    $self->{'doc_obj'} = new doc ($self->{'filename'}, "indexed_doc", $self->{'file_rename_method'});
     $self->{'doc_obj'}->add_utf8_metadata($self->{'doc_obj'}->get_top_section(), "Plugin", "$self->{'plugin_type'}");