Minor fixes.
authorGreg Sabino Mullane <greg@endpoint.com>
Thu, 23 Apr 2009 19:34:39 +0000 (15:34 -0400)
committerGreg Sabino Mullane <greg@endpoint.com>
Thu, 23 Apr 2009 19:34:39 +0000 (15:34 -0400)
t/02_new_version_pg.t

index 0199bd905609881f81e2187eeaf6782179afe27d..e9119709fe1d5482cffd0413e840924a22110c89 100644 (file)
@@ -9,13 +9,13 @@ use Test::More tests => 5;
 use lib 't','.';
 use CP_Testing;
 
-use vars qw/$dbh $SQL $t/;
+use vars qw/$dbh $t/;
 
 my $cp = CP_Testing->new( {default_action => 'new_version_pg'} );
 
 $dbh = $cp->test_database_handle();
 
-my $S = q{Action 'version'};
+my $S = q{Action 'new_version_pg'};
 my $label = 'POSTGRES_NEW_VERSION_PG';
 
 $t=qq{$S fails when called with an invalid option};