[svn:parrot] r35985 - trunk/t/tools/pmc2cutils

[email protected] Sat, 24 Jan 2009 23:39:37 -0800 (PST)
Newsgroups perl.cvs.parrot
Message-ID <[email protected]>
Author: cotto
Date: Sat Jan 24 23:39:37 2009
New Revision: 35985

Modified:
   trunk/t/tools/pmc2cutils/04-dump_pmc.t

Log:
[t] undo some accidentally committed code


Modified: trunk/t/tools/pmc2cutils/04-dump_pmc.t
==============================================================================
--- trunk/t/tools/pmc2cutils/04-dump_pmc.t	(original)
+++ trunk/t/tools/pmc2cutils/04-dump_pmc.t	Sat Jan 24 23:39:37 2009
@@ -231,7 +231,7 @@
 
 # @args hold default.pmc and 3 other .pmc files in dependency order
 {
-    my $tdir = tempdir( CLEANUP => 0 );
+    my $tdir = tempdir( CLEANUP => 1 );
     ok( chdir $tdir, 'changed to temp directory for testing' );
     my $pmcdir = q{src/pmc};
     ok( ( mkdir qq{$tdir/src} ), "created src/ under tempdir" );
@@ -292,7 +292,7 @@
 # how should a missing dependency be handled?
 # scalar requires integer
 {
-    my $tdir = tempdir( CLEANUP => 0 );
+    my $tdir = tempdir( CLEANUP => 1 );
     ok( chdir $tdir, 'changed to temp directory for testing' );
     my $pmcdir = q{src/pmc};
     ok( ( mkdir qq{$tdir/src} ), "created src/ under tempdir" );