Show
Ignore:
Timestamp:
03.08.2011 21:17:30 (8 years ago)
Author:
ak19
Message:

The method of locating perl has changed once more: util now defines the fuction get_perl_exec which is used by other scripts to obtain the path to the perl executable they should use.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/g2futil.pm

    r24192 r24362  
    1515use strict; 
    1616use util; 
    17 use Config; # for getting the perlpath in the recommended way 
    1817 
    1918sub run_cmd_old 
     
    3130     
    3231    if ($verbosity >= 2) { 
    33     print "Runing command:\n"; 
     32    print "Running command:\n"; 
    3433    print "$cmd\n"; 
    3534    } 
     
    6463    } 
    6564    if (($prog =~ m/.pl$/i) && ($ENV{'GSDLOS'} =~ m/^windows/)) { 
    66     $prog ="\"$Config{perlpath}\" -S $prog"; 
     65    $prog ="\"".&util::get_perl_exec()."\" -S $prog"; 
    6766    } 
    6867