httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ran...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestRun.pm
Date Sun, 11 Jan 2004 15:25:12 GMT
randyk      2004/01/11 07:25:12

  Modified:    perl-framework/Apache-Test/lib/Apache TestRun.pm
  Log:
  Run t/TEST as $^X t/TEST, for the benefit of Win32.
  
  Revision  Changes    Path
  1.138     +1 -1      httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm
  
  Index: TestRun.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
  retrieving revision 1.137
  retrieving revision 1.138
  diff -u -r1.137 -r1.138
  --- TestRun.pm	11 Jan 2004 15:22:10 -0000	1.137
  +++ TestRun.pm	11 Jan 2004 15:25:12 -0000	1.138
  @@ -630,7 +630,7 @@
   
       # reconstruct argv, preserve multiwords args, eg 'PerlTrace all'
       my $argv = join " ", map { /^-/ ? $_ : qq['$_'] } @ARGV;
  -    $original_command = "$0 $argv";
  +    $original_command = "$^X $0 $argv";
       $orig_cwd = Cwd::cwd();
       $self->set_ulimit;
       $self->set_env; #make sure these are always set
  
  
  

Mime
View raw message