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

Timestamp:

2010-09-08T12:56:19+12:00 (14 years ago)

Author:

kjdon

Message:

now have an html_multi option to convert_to (for PowerPointPlugin)

File:

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

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

@@ -158 +158 @@
     }
 
-    if ($convert_to eq "html") {
+    if ($convert_to =~ /^html/) { # may be html or html_multi
     $self->{'convert_to_plugin'} = "HTMLPlugin";
     $self->{'convert_to_ext'} = "html";
@@ -429 +429 @@
     my ($tailname, $dirname, $suffix)
     = &File::Basename::fileparse($filename_full_path, "\\.[^\\.]+\$");
-$doc_obj->set_utf8_metadata_element($doc_obj->get_top_section(), "FilenameRoot", $tailname);
+    $doc_obj->set_utf8_metadata_element($doc_obj->get_top_section(), "FilenameRoot", $tailname);
 
     # do plugin specific processing of doc_obj