Changeset 10503


Ignore:
Timestamp:
2005-08-12T12:23:59+12:00 (19 years ago)
Author:
kjdon
Message:

added some handling of auto convert to type when windows scripting is on

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/perllib/plugins/ConvertToPlug.pm

    r10463 r10503  
    146146   
    147147   
    148     if ($classPluginName eq "PDFPlug" && $strConvertTo eq "text" &&
    149     $ENV{'GSDLOS'} =~ /^windows$/i) {
    150     print STDERR "Windows does not support pdf to text. PDFs will be converted to HTML instead\n";
    151     $strConvertTo = "html";
    152     } elsif ($classPluginName eq "WordPlug" && $blnWindowsScripting eq "true" && $ENV{'GSDLOS'} =~ /^windows$/i) {
    153     # we use structured HTML
    154     $strConvertTo = "structuredhtml";
    155     } elsif ($strConvertTo eq "auto") {
     148    if ($classPluginName eq "PDFPlug") {
     149    if ($strConvertTo eq "text" &&
     150        $ENV{'GSDLOS'} =~ /^windows$/i) {
     151        print STDERR "Windows does not support pdf to text. PDFs will be converted to HTML instead\n";
     152        $strConvertTo = "html";
     153    }
     154    } elsif ($classPluginName eq "WordPlug") {
     155    if ($blnWindowsScripting eq "true" && $ENV{'GSDLOS'} =~ /^windows$/i && $strConvertTo =~ /^(html|auto)$/) {
     156        # we use structured HTML, not normal html
     157        $strConvertTo = "structuredhtml";
     158    }
     159    }
     160    elsif ($classPluginName eq "PPTPlug") {
     161    if ($blnWindowsScripting eq "true" && $ENV{'GSDLOS'} =~ /^windows$/i && $strConvertTo eq "auto") {
     162        # we use paged img
     163        $strConvertTo = "pagedimg_jpg";
     164    }
     165    }
     166    elsif ($strConvertTo eq "auto") {
    156167    # choose html for now - should choose a format based on doc type
    157168    $strConvertTo = "html";
Note: See TracChangeset for help on using the changeset viewer.