[siesta-commit] siesta/t 15defer.t,1.1,1.2

[prev] [thread] [next] [lurker] [Date index for 2003/03/16]

From: clampr
Subject: [siesta-commit] siesta/t 15defer.t,1.1,1.2
Date: 01:02 on 16 Mar 2003
Update of /cvsroot/siesta/siesta/t
In directory sc8-pr-cvs1:/tmp/cvs-serv9307

Modified Files:
	15defer.t 
Log Message:
shoop


Index: 15defer.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/15defer.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- 15defer.t	16 Mar 2003 00:47:54 -0000	1.1
+++ 15defer.t	16 Mar 2003 01:02:49 -0000	1.2
@@ -3,11 +3,13 @@
 use Test::More tests => 5;
 use Siesta;
 use Siesta::Config;
-
-unlink map { <t/root/queue/dealers/$_/*> } qw( tmp new cur );
+use File::Find::Rule;
 
 Siesta->connect( DBI => "dbi:SQLite:t/test.db" );
 $Siesta::Config::ROOT = 't/root';
+
+# clear out any files from previous runs
+unlink find( file => in => $Siesta::Config::ROOT );
 
 my $list = Siesta::List->new('dealers');
 ok( $list, "got a list" );



Generated at 13:57 on 01 Jul 2004 by mariachi 0.52