In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/eb883b9286505f2ba163b6a72b9978e9a3645b4d?hp=6294fed80448f0136ca1d81cbf068a7ed0168d09>

- Log -----------------------------------------------------------------
commit eb883b9286505f2ba163b6a72b9978e9a3645b4d
Author: George Greer <[email protected]>
Date:   Wed Jun 15 23:59:22 2011 -0400

    CGI: Reset permissions during temporary directory test so Win32 can remove.
    
    The 'tmpdir.t' test leaves the permissions of the directories at 0500, which
    translates into setting the 'read-only' bit in Win32-speak.  That makes the
    'rmdir' in the END block fail (silently) and thus the test is very unhappy
    the next time through.  It is easy enough to just run the test twice to see.
-----------------------------------------------------------------------

Summary of changes:
 cpan/CGI/t/tmpdir.t |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/cpan/CGI/t/tmpdir.t b/cpan/CGI/t/tmpdir.t
index 6e3fcbd..1407356 100644
--- a/cpan/CGI/t/tmpdir.t
+++ b/cpan/CGI/t/tmpdir.t
@@ -37,4 +37,4 @@ isnt($CGITempFile::TMPDIRECTORY, $testdir,
  "unwritable \$ENV{TMPDIR} not overridden with an unwritable 
\$CGITempFile::TMPDIRECTORY");
 }
 
-END { rmdir for ($testdir, $testdir2) }
+END { for ($testdir, $testdir2) { chmod 0700, $_; rmdir; } }

--
Perl5 Master Repository

Reply via email to