make test for default SQLite under Test::Roo more explicit

frioux · Dec 29, 2019 · 8a5d003 · 8a5d003
1 parent bd043c4
commit 8a5d003
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/t/ResultSet/Explain.t b/t/ResultSet/Explain.t
@@ -16,7 +16,7 @@ top_test basic => sub {
    my $rs = $self->rs;
    SKIP: {
       skip 'cannot test without a connection', 1 unless $self->connected;
-      $ran++;
+      $ran++ if $self->engine eq 'SQLite';
 
       my $s;
       my $e = exception { $s = $rs->explain };
@@ -32,5 +32,5 @@ run_me(SQLite => {
 run_me(Pg     => { engine => 'Pg'     });
 run_me(mysql  => { engine => 'mysql'  });
 
-ok $ran, 'tests were acutally run';
+ok $ran, 'tests were run against default SQLite';
 done_testing;
diff --git a/t/ResultSet/Shortcut/ResultsExist.t b/t/ResultSet/Shortcut/ResultsExist.t
@@ -17,7 +17,7 @@ top_test 'basic functionality' => sub {
   SKIP: {
     skip 'cannot test without a connection', 1 unless $self->connected;
 
-    $ran++;
+    $ran++ if $self->engine eq 'SQLite';
     $schema->prepopulate;
 
     my $rs = $schema->resultset( 'Foo' )->search({ id => { '>' => 0 } });
@@ -63,5 +63,5 @@ run_me(SQLite => {
 run_me(Pg     => { engine => 'Pg'     });
 run_me(mysql  => { engine => 'mysql'  });
 
-ok $ran, 'tests were acutally run';
+ok $ran, 'tests were run against default SQLite';
 done_testing;