cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestRun.pm

[stas]

stas        2003/01/31 14:21:03

  Modified:    perl-framework/Apache-Test/lib/Apache TestRun.pm
  Log:
  adjustments of perms shouldn't be attempted to be done on winfu.
  Submitted by: Randy Kobes <[EMAIL PROTECTED]>
  Reviewed by:  stas
  
  Revision  Changes    Path
  1.101     +5 -0      
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.100
  retrieving revision 1.101
  diff -u -r1.100 -r1.101
  --- TestRun.pm        31 Jan 2003 00:53:45 -0000      1.100
  +++ TestRun.pm        31 Jan 2003 22:21:03 -0000      1.101
  @@ -665,6 +665,9 @@
   # We solve that by 'chown -R bar.bar t/' in a portable way.
   sub adjust_t_perms {
       my $self = shift;
  +
  +    return if Apache::TestConfig::WINFU;
  +
       %original_t_perms = (); # reset global
   
       my $user = getpwuid($>) || '';
  @@ -683,6 +686,8 @@
   
   sub restore_t_perms {
       my $self = shift;
  +
  +    return if Apache::TestConfig::WINFU;
   
       if (%original_t_perms) {
           my $vars = $self->{test_config}->{vars};