Changeset 24124 for main/trunk/greenstone2/bin/script/gsConvert.pl

Timestamp:

2011-06-08T16:04:52+12:00 (13 years ago)

Author:

ak19

Message:

Sam worked out that pdftohtml was being launched without quotes around the perl path used to run it. There wre more places that required the quotes. Professor Witten discovered the problem with the CD binary.

File:

• main/trunk/greenstone2/bin/script/gsConvert.pl (modified) (4 diffs)

main/trunk/greenstone2/bin/script/gsConvert.pl

@@ -414 +414 @@
     my $cmd = "";
     my $full_perl_path = &util::filename_cat($ENV{'PERLPATH'},"perl");
-    $cmd .= "$full_perl_path -S ppttohtml.pl ";
+    $cmd .= "\"$full_perl_path\" -S ppttohtml.pl ";
     $cmd .= " \"$input_filename\" \"$output_filestem.html\"";
     $cmd .= " 2>\"$output_filestem.err\""
@@ -448 +448 @@
     my $cmd = "";
     my $full_perl_path = &util::filename_cat($ENV{'PERLPATH'},"perl");
-    $cmd .= "$full_perl_path -S xlstohtml.pl ";
+    $cmd .= "\"$full_perl_path\" -S xlstohtml.pl ";
     $cmd .= " \"$input_filename\" \"$output_filestem.html\"";
     $cmd .= " 2>\"$output_filestem.err\""
@@ -987 +987 @@
     if ($timeout) {$cmd = "ulimit -t $timeout;";}
     my $full_perl_path = &util::filename_cat($ENV{'PERLPATH'},"perl");
-    $cmd .= "$full_perl_path -S pdftohtml.pl -zoom $pdf_zoom";
+    $cmd .= "\"$full_perl_path\" -S pdftohtml.pl -zoom $pdf_zoom";
     $cmd .= " -c" if ($pdf_complex);
     $cmd .= " -i" if ($pdf_ignore_images);
@@ -1062 +1062 @@
     $output_type =~ s/.*\_(.*)/$1/i;
     my $full_perl_path = &util::filename_cat($ENV{'PERLPATH'},"perl");
-    $cmd .= "$full_perl_path -S pdfpstoimg.pl -convert_to $output_type \"$input_filename\" \"$output_filestem\"";
+    $cmd .= "\"$full_perl_path\" -S pdfpstoimg.pl -convert_to $output_type \"$input_filename\" \"$output_filestem\"";
     if ($ENV{'GSDLOS'} !~ m/^windows$/i || $is_winnt_2000) {
     $cmd .= " > \"$output_filestem.out\" 2> \"$output_filestem.err\"";