httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestUtil.pm
Date Mon, 02 Dec 2002 17:01:50 GMT
stas        2002/12/02 09:01:50

  Modified:    .        Changes
               perl-framework/Apache-Test/lib/Apache TestUtil.pm
  Log:
  Apache::TestUtil::t_mkdir() now creates dirs which are
  writable/executable by the user who invokes it
  
  Revision  Changes    Path
  1.71      +3 -0      modperl-2.0/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Changes,v
  retrieving revision 1.70
  retrieving revision 1.71
  diff -u -r1.70 -r1.71
  --- Changes	2 Dec 2002 16:22:09 -0000	1.70
  +++ Changes	2 Dec 2002 17:01:49 -0000	1.71
  @@ -10,6 +10,9 @@
   
   =item 1.99_08-dev
   
  +Apache::TestUtil::t_mkdir() now creates dirs which are
  +writable/executable by the user who invokes it [Stas Bekman]
  +
   Move the custom mod_perl 2.0 configuration bits out of the
   ModPerl::TestRun, where they don't belong, into a special config file
   which is included at the very end of httpd.conf [Stas Bekman]
  
  
  
  1.26      +3 -1      httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm
  
  Index: TestUtil.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm,v
  retrieving revision 1.25
  retrieving revision 1.26
  diff -u -r1.25 -r1.26
  --- TestUtil.pm	6 Jan 2002 06:11:57 -0000	1.25
  +++ TestUtil.pm	2 Dec 2002 17:01:50 -0000	1.26
  @@ -118,8 +118,10 @@
       return if !defined($path) || -e $path;
       my $full_path = $path;
   
  -    # remember which dirs were created and should be cleaned up
  +    # + make the dir writable/executable by the user
  +    # + remember which dirs were created and should be cleaned up
       while (1) {
  +        chmod 0755, $path;
           $CLEAN{dirs}{$path} = 1;
           $path = dirname $path;
           last if -e $path;
  
  
  

Mime
View raw message