[DBD::Pg] More tweaking of skip test counts in 02attribs.t

[email protected] Fri, 18 Apr 2014 19:52:14 +0000
Newsgroups perl.dbd.pg.changes
Message-ID <[email protected]>
Committed by Greg Sabino Mullane <[email protected]>

More tweaking of skip test counts in 02attribs.t

---
 t/02attribs.t | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/t/02attribs.t b/t/02attribs.t
index bdccea4..e671fd5 100644
--- a/t/02attribs.t
+++ b/t/02attribs.t
@@ -1541,12 +1541,12 @@ $attrib = $dbh->{Active};
 is ($attrib, '', $t);
 
 SKIP: {
-	skip ('Cannot test database handle "AutoInactiveDestroy" on a non-forking system', 8)
+	skip ('Cannot test database handle "AutoInactiveDestroy" on a non-forking system', 9)
 		if $^O =~ /Win/;
 
 	require Test::Simple;
 
-	skip ('Test::Simple version 0.47 or better required for testing of attribute "AutoInactiveDestroy"', 8)
+	skip ('Test::Simple version 0.47 or better required for testing of attribute "AutoInactiveDestroy"', 9)
 		if $Test::Simple::VERSION < 0.47;
 
 	# Test of forking. Hang on to your hats
@@ -1600,7 +1600,7 @@ SKIP: {
 			is ($state, '08000', $t);
 
 			$t=qq{pg_ping gives an error code of -2 after the child has exited ("AutoInactiveDestroy" = $destroy)};
-			is ( $dbh->pg_ping(), -2,$t);
+			is ( $dbh->pg_ping(), -2, $t);
 			ok ($dbh->disconnect(), 'Disconnect from database');
 		}
 	}
-- 
1.8.4