Changeset 15582

Show
Ignore:
Timestamp:
19.05.2008 17:38:54 (11 years ago)
Author:
ak19
Message:

Dr Bainbridge added code to make sure that on Windows other perl programs are launched with perl -S flag

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/g2futil.pm

    r15395 r15582  
    55{ 
    66    if (!defined $ENV{'FEDORA_HOME'}) { 
    7     print STDERR "Environment variable FEDORA_HOME not set.\n"; 
     7    print STDERR "ERROR: Environment variable FEDORA_HOME not set.\n"; 
    88    exit 1; 
    99    } 
     
    5656    $prog .= $script_ext; 
    5757    } 
     58    if (($prog =~ m/.pl$/i) && ($ENV{'GSDLOS'} =~ m/^windows/)) { 
     59    $prog ="perl -S $prog"; 
     60    } 
     61  
    5862 
    5963    my $cmd = "$prog $arguments";