[Module-build-general] Re: Module::Build 0.18 test failure under Windows XP

[Ken W. <ke...@ma...>]

Hi Andrew,

Thanks for the report!  I've patched it in CVS.

Bug reports can go to the mailing list or to RT, doesn't matter.

  -Ken

On Sunday, April 13, 2003, at 12:13  AM, Andrew Savige wrote:

> Hi Ken,
>
> Please let me know where you want me to send bug reports in future.
> rt.cpan.org? Module::Build mailing list?
> Anyway, I found this one today when installing Module::Build 0.18.
> Apologies if it has already been reported.
>
> Module::Build 0.18 t/runthrough.t test 13 failed under Windows XP:
>
> ok 12
> Deleting save_out
> Deleting blib
> Can't unlink file blib/script/script: Permission denied at
> G:/Perl/site/lib/Module/Build/Base.pm line 1186
> Can't remove directory blib/script: Directory not empty at
> G:/Perl/site/lib/Module/Build/Base.pm line 1186
> Can't remove directory blib: Directory not empty at
> G:/Perl/site/lib/Module/Build/Base.pm line 1186
> not ok 13
>
> Root cause of failure is file blib/script/script is open when test 13
> tries to delete it with Base.pm, line 1186 (File::Path::rmtree).
>
> Change t/runthrough.t from:
>
> my $fh = IO::File->new($blib_script);
> my $first_line = <$fh>;
> print "# rewritten shebang?\n$first_line";
>
> ok $first_line ne "#!perl -w\n";
>
> to:
>
> {
> my $fh = IO::File->new($blib_script);
> my $first_line = <$fh>;
> print "# rewritten shebang?\n$first_line";
>
> ok $first_line ne "#!perl -w\n";
> }
>
> to close $fh on end of scope and the test now passes.
>
> /-\
>
>
> http://mobile.yahoo.com.au - Yahoo! Mobile
> - Check & compose your email via SMS on your Telstra or Vodafone 
> mobile.