diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-02-05 22:02:50 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-02-05 22:02:50 +0000 |
commit | 98d84473cbdd600ea0a62255d76863484ac654f0 (patch) | |
tree | 3587bb60b3885dc5e9983519d3be1cfbcd2a59dc /lib | |
parent | 26866f99b421a0fa48720d3ab1c6664d3cde4a59 (diff) | |
download | perl-98d84473cbdd600ea0a62255d76863484ac654f0.tar.gz |
Stop lib/h2xs.t failing needlessly if it failed to clear up behind
itself on a previous run.
p4raw-id: //depot/perl@23942
Diffstat (limited to 'lib')
-rw-r--r-- | lib/h2xs.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/h2xs.t b/lib/h2xs.t index e6c75c091d..a59afa2f58 100644 --- a/lib/h2xs.t +++ b/lib/h2xs.t @@ -57,6 +57,9 @@ my $name = 'h2xst'; my $header = "$name.h"; my $thisversion = sprintf "%vd", $^V; +# If this test has failed previously a copy may be left. +rmtree($name); + my @tests = ( "-f -n $name", $], <<"EOXSFILES", Defaulting to backwards compatibility with perl $thisversion |