found a bug with use of id not $pk - thanks tests!!

[dbsrgits/DBIx-Class-Journal.git] / t / 03populate.t

diff --git a/t/03populate.t b/t/03populate.t
index c6fa507..d03a3a1 100644 (file)
--- a/t/03populate.t
+++ b/t/03populate.t
@@ -6,7 +6,7 @@ BEGIN {
     eval "use DBD::SQLite; use SQL::Translator";
     plan $@
         ? ( skip_all => 'needs DBD::SQLite and SQL::Translator for testing' )
-        : ( tests => 21 );
+        : ( tests => 17 );
 }
 
 use lib qw(t/lib);
@@ -14,9 +14,9 @@ use DBICTest;
 
 # connect to db and deploy only the original db schema, not journal schema
 my $schema = DBICTest->init_schema(no_populate => 1, no_deploy => 1);
-$schema->deploy;
 
 ok($schema, 'Created a Schema');
+$schema->deploy;
 
 # check we have no journal
 my $count = eval {