[siesta-commit] siesta/t 06database.t,1.2,1.3

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

From: clampr
Subject: [siesta-commit] siesta/t 06database.t,1.2,1.3
Date: 16:37 on 26 Aug 2002
Update of /cvsroot/siesta/siesta/t
In directory usw-pr-cvs1:/tmp/cvs-serv30569

Modified Files:
	06database.t 
Log Message:
drop dodgy encapsulation-reaming tests


Index: 06database.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/06database.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- 06database.t	23 Aug 2002 14:32:08 -0000	1.2
+++ 06database.t	26 Aug 2002 15:37:42 -0000	1.3
@@ -1,7 +1,7 @@
 #!perl -w
 use strict;
 
-use Test::More tests => 8;
+use Test::More tests => 5;
 use Test::MockObject;
 use Siesta::Config;
 BEGIN { $Siesta::Config::DBFILE = 't/test.db' }
@@ -10,9 +10,6 @@
 my $t_lists = Siesta::Storage::Table::Lists->new();
 ok( $t_lists, "got table object for lists");
 isa_ok( $t_lists, "Siesta::Storage::Table::Lists",  );
-isa_ok( $t_lists, "Siesta::Storage::Table",  );
-isa_ok( $t_lists, "Class::DBI",  );
-isa_ok( $t_lists, "Ima::DBI",  );
 
 can_ok( $t_lists, 'dbh' );
 my $dbh = $t_lists->dbh();



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