Changeset 28355 for main/trunk/greenstone2/bin/script
- Timestamp:
- 2013-10-04T19:52:18+13:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/bin/script/gsConvert.pl
r28166 r28355 386 386 my $vbScript = &FileUtils::filenameConcatenate($ENV{'GSDLHOME'}, "bin", 387 387 $ENV{'GSDLOS'}, "pptextract"); 388 $vbScript = "pptextract" if ($ENV{'GSDLOS'} =~ m/^windows$/i); 388 $vbScript = "CScript //Nologo \"".$vbScript.".vbs\"" if ($ENV{'GSDLOS'} =~ m/^windows$/i); # now we use the .vbs VBScript 389 # $vbScript = "pptextract" if ($ENV{'GSDLOS'} =~ m/^windows$/i); # back when the pptextract.exe VB executable was used 389 390 390 391 my $cmd = ""; … … 398 399 $cmd .= " 2>\"$output_filestem.err\"" 399 400 if ($ENV{'GSDLOS'} !~ m/^windows$/i || $is_winnt_2000); 401 400 402 if (system($cmd) !=0) { 401 403 print STDERR "Powerpoint VB Scripting convert failed\n"; … … 549 551 # else script launch fails when there are error msgs 550 552 $vbScript = &FileUtils::filenameConcatenate($vbScript, "docx2html.vbs"); 551 $vbScript = "CScript //Nologo \"$vbScript\""; # launch ewith CScript for error output in STDERR553 $vbScript = "CScript //Nologo \"$vbScript\""; # launch with CScript for error output in STDERR 552 554 # //Nologo flag avoids Microsoft's opening/logo msgs 553 555 print STDERR "About to use windows scripting to process docx file $input_filename.\n";
Note:
See TracChangeset
for help on using the changeset viewer.