summaryrefslogtreecommitdiffstats
path: root/plugins/t
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/t')
-rw-r--r--plugins/t/check_imap.t4
1 files changed, 3 insertions, 1 deletions
diff --git a/plugins/t/check_imap.t b/plugins/t/check_imap.t
index f86faa4..32b4136 100644
--- a/plugins/t/check_imap.t
+++ b/plugins/t/check_imap.t
@@ -10,7 +10,7 @@ use Test;
10use NPTest; 10use NPTest;
11 11
12use vars qw($tests); 12use vars qw($tests);
13BEGIN {$tests = 5; plan tests => $tests} 13BEGIN {$tests = 7; plan tests => $tests}
14 14
15my $host_tcp_smtp = getTestParameter( "host_tcp_smtp", "NP_HOST_TCP_SMTP", "mailhost", 15my $host_tcp_smtp = getTestParameter( "host_tcp_smtp", "NP_HOST_TCP_SMTP", "mailhost",
16 "A host providing an STMP Service (a mail server)"); 16 "A host providing an STMP Service (a mail server)");
@@ -33,6 +33,8 @@ $t += checkCmd( "./check_imap -H $host_tcp_imap -p 143 -w 9 -c 9 -t 10 -e '*
33$t += checkCmd( "./check_imap $host_tcp_imap -p 143 -wt 9 -ct 9 -to 10 -e '* OK'", 0, undef, %exceptions ); 33$t += checkCmd( "./check_imap $host_tcp_imap -p 143 -wt 9 -ct 9 -to 10 -e '* OK'", 0, undef, %exceptions );
34$t += checkCmd( "./check_imap $host_nonresponsive", 2 ); 34$t += checkCmd( "./check_imap $host_nonresponsive", 2 );
35$t += checkCmd( "./check_imap $hostname_invalid", 2 ); 35$t += checkCmd( "./check_imap $hostname_invalid", 2 );
36$t += checkCmd( "./check_imap -H $host_tcp_imap -e unlikely_string", 1);
37$t += checkCmd( "./check_imap -H $host_tcp_imap -e unlikely_string -M crit", 2);
36 38
37 39
38exit(0) if defined($Test::Harness::VERSION); 40exit(0) if defined($Test::Harness::VERSION);