percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2026-04-17 01:01:39 +08:00
Code Issues Packages Projects Releases Wiki Activity

Reverted a few unnecessary changes

Browse Source
This commit is contained in:
Brian Fraser
2012-11-08 17:47:00 -03:00
parent 42a9cf4b6e
commit 7beb0b518e
6 changed files with 8 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
t/lib/Cxn.t
View File

@@ -9,8 +9,7 @@ BEGIN {
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use Test::More;
use Data::Dumper;
use Test::More tests => 19;
use Sandbox;
use OptionParser;
@@ -18,7 +17,8 @@ use DSNParser;
use Quoter;
use PerconaTest;
use Cxn;
use VersionParser;
use Data::Dumper;
my $q = new Quoter();
my $dp = new DSNParser(opts=>$dsn_opts);
@@ -248,10 +248,12 @@ is_deeply(
"Default cxn inherits default connection options"
);
@ARGV = ();
$o->get_opts();
# #############################################################################
# Done.
# #############################################################################
$master_dbh->disconnect() if $master_dbh;
ok($sb->ok(), "Sandbox servers") or BAIL_OUT(__FILE__ . " broke the sandbox");
done_testing;
exit;