develooper Front page | perl.cvs.parrot | Postings from January 2009

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

From:
cotto
Date:
January 24, 2009 23:39
Subject:
[svn:parrot] r35985 - trunk/t/tools/pmc2cutils
Message ID:
20090125073937.BEFEECB9AE@x12.develooper.com
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" );



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About