Changeset 28653

Show
Ignore:
Timestamp:
20.11.2013 12:58:26 (6 years ago)
Author:
jmt12
Message:

Changed the way a require was 'eval'd - but I have no idea why

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gs2-extensions/parallel-building/trunk/src/perllib/FileUtils.pm

    r27531 r28653  
    170170    my $protocol = substr($path, 0, $colon_index); 
    171171    # check the perl module exists 
    172     eval 
    173     { 
    174       require 'FileUtils/' . $protocol . '.pm'; 
    175     }; 
     172    eval 'require "FileUtils/' . $protocol . '.pm"'; 
     173    #eval 
     174    #{ 
     175    #  require 'FileUtils/' . $protocol . '.pm'; 
     176    #}; 
    176177    if ($@) 
    177178    { 
    178       die($@); 
    179179      print STDERR 'Warning! FileUtils::_determineDriver() driver not found (defaulting to local filesystem):' . $protocol . "\n" . $@ . "\n"; 
    180180    }