diff options
Diffstat (limited to 'plugins/t/check_mysql.t')
-rw-r--r-- | plugins/t/check_mysql.t | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/plugins/t/check_mysql.t b/plugins/t/check_mysql.t index ae2a0087..0fae65fe 100644 --- a/plugins/t/check_mysql.t +++ b/plugins/t/check_mysql.t | |||
@@ -1,11 +1,12 @@ | |||
1 | #! /usr/bin/perl -w | 1 | #! /usr/bin/perl -w |
2 | 2 | ||
3 | use strict; | 3 | use strict; |
4 | use Helper; | ||
4 | use Cache; | 5 | use Cache; |
5 | use Test; | 6 | use Test; |
6 | use vars qw($tests); | 7 | use vars qw($tests); |
7 | 8 | ||
8 | BEGIN {$tests = 1; plan tests => $tests} | 9 | BEGIN {$tests = 2; plan tests => $tests} |
9 | 10 | ||
10 | exit(0) unless (-x "./check_mysql"); | 11 | exit(0) unless (-x "./check_mysql"); |
11 | 12 | ||
@@ -14,10 +15,12 @@ my $cmd; | |||
14 | my $str; | 15 | my $str; |
15 | my $t; | 16 | my $t; |
16 | 17 | ||
17 | $cmd = "./check_mysql -H 127.0.0.1 -P 3306"; | 18 | my $mysqlserver = get_option("mysqlserver","host for MYSQL tests"); |
19 | |||
20 | $cmd = "./check_mysql -H $mysqlserver -P 3306"; | ||
18 | $str = `$cmd`; | 21 | $str = `$cmd`; |
19 | $t += ok $?>>8,0; | 22 | $t += ok $?>>8,2; |
20 | print "Test was: $cmd\n" if ($?); | 23 | $t += ok $str, '/Access denied for user: /'; |
21 | 24 | ||
22 | exit(0) if defined($Test::Harness::VERSION); | 25 | exit(0) if defined($Test::Harness::VERSION); |
23 | exit($tests - $t); | 26 | exit($tests - $t); |