Clean up test files left behind (on Win32, at least) by Archive-Extract

p4raw-id: //depot/perl@31904

diff --git a/lib/Archive/Extract/t/01_Archive-Extract.t b/lib/Archive/Extract/t/01_Archive-Extract.t
index 4332517..60a26cf 100644 (file)
--- a/lib/Archive/Extract/t/01_Archive-Extract.t
+++ b/lib/Archive/Extract/t/01_Archive-Extract.t
@@ -7,6 +7,7 @@ BEGIN {
 
 BEGIN { chdir 't' if -d 't' };
 BEGIN { mkdir 'out' unless -d 'out' };
+END { rmtree('out') };
 
 use strict;
 use lib qw[../lib];