Changeset 26893 for main/trunk/greenstone2/perllib/plugins/ConvertBinaryFile.pm

Timestamp:

2013-02-19T14:12:28+13:00 (11 years ago)

Author:

kjdon

Message:

ConvertBinaryFile needs to reset the doc OID after all the processing has been done. This will mean it uses the top level plugin OIDtype settings, rather than the secondary plugin ones.

File:

• main/trunk/greenstone2/perllib/plugins/ConvertBinaryFile.pm (modified) (3 diffs)

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

@@ -175 +175 @@
     $self->{'convert_to_ext'} = $convert_to_ext;
     }
-
 }
 sub init {
@@ -405 +404 @@
     $doc_obj->set_converted_filename($collect_conv_file);
 
-    my $plugin_filename_encoding = $self->{'filename_encoding'};
+    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_full_path, $filename_encoding);
@@ -434 +433 @@
     $self->title_fallback($doc_obj,$topsection,$filename_no_path);
 
-    $self->add_OID($doc_obj);
+    # force a new OID - this will use OIDtype option set for this plugin.
+    $self->add_OID($doc_obj, 1);
 
     return (1, $doc_obj);