[siesta-commit] siesta/t 06database.t,1.3,1.4 07list.t,1.13,1.14 07user.t,1.1,1.2 10plugin_membersonly.t,1.4,1.5

[prev] [thread] [next] [lurker] [Date index for 2002/08/28]

Update of /cvsroot/siesta/siesta/t
In directory usw-pr-cvs1:/tmp/cvs-serv14770/t

Modified Files:
	06database.t 07list.t 07user.t 10plugin_membersonly.t 
Log Message:
bigass ->connect ->storage refactor

Index: 06database.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/06database.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- 06database.t	26 Aug 2002 15:37:42 -0000	1.3
+++ 06database.t	28 Aug 2002 10:05:24 -0000	1.4
@@ -3,9 +3,10 @@
 
 use Test::More tests => 5;
 use Test::MockObject;
-use Siesta::Config;
-BEGIN { $Siesta::Config::DBFILE = 't/test.db' }
+use Siesta;
 use Siesta::List;
+
+Siesta->connect( DBI=> "dbi:SQLite:t/test.db" );
 
 my $t_lists = Siesta::Storage::Table::Lists->new();
 ok( $t_lists, "got table object for lists");

Index: 07list.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/07list.t,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -d -r1.13 -r1.14
--- 07list.t	26 Aug 2002 22:49:40 -0000	1.13
+++ 07list.t	28 Aug 2002 10:05:24 -0000	1.14
@@ -2,9 +2,10 @@
 use strict;
 use Test::More tests => 23;
 use Test::MockObject;
-use Siesta::Config;
-BEGIN { $Siesta::Config::DBFILE = 't/test.db' }
+use Siesta;
 use Siesta::List;
+
+Siesta->connect( DBI=> "dbi:SQLite:t/test.db" );
 
 my $list = Siesta::List->new( 'dealers' );
 ok( $list, "list created" );

Index: 07user.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/07user.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- 07user.t	25 Aug 2002 15:14:25 -0000	1.1
+++ 07user.t	28 Aug 2002 10:05:24 -0000	1.2
@@ -2,9 +2,10 @@
 use strict;
 use Test::More tests => 2;
 use Test::MockObject;
-use Siesta::Config;
-BEGIN { $Siesta::Config::DBFILE = 't/test.db' }
+use Siesta;
 use Siesta::User;
+
+Siesta->connect( DBI=> "dbi:SQLite:t/test.db" );
 
 my $user = Siesta::User->new('jay@xxxxxxxx.xxxxxxxxxx');
 ok( $user, "user created" );

Index: 10plugin_membersonly.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/10plugin_membersonly.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- 10plugin_membersonly.t	23 Aug 2002 14:26:38 -0000	1.4
+++ 10plugin_membersonly.t	28 Aug 2002 10:05:24 -0000	1.5
@@ -3,11 +3,11 @@
 use strict;
 use Test::More tests => 4;
 use Test::MockObject;
-use Siesta::Config;
-BEGIN { $Siesta::Config::DBFILE = 't/test.db' }
+use Siesta;
 use Siesta::List;
 use Siesta::Plugin::MembersOnly;
 
+Siesta->connect( DBI=> "dbi:SQLite:t/test.db" );
 
 my $message;
 my $plugin = Siesta::Plugin::MembersOnly->new;

• [siesta-commit] siesta/t 06database.t,1.3,1.4 07list.t,1.13,1.14 07user.t,1.1,1.2 10plugin_membersonly.t,1.4,1.5 clampr 11:05 on 28 Aug 2002

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