diff options
author | Gavin Carr <gonzai@users.sourceforge.net> | 2006-09-26 01:10:23 +0000 |
---|---|---|
committer | Gavin Carr <gonzai@users.sourceforge.net> | 2006-09-26 01:10:23 +0000 |
commit | e548a22a92b3aa345f4a952fddb39cc693c35a70 (patch) | |
tree | 606e3872d3070a90b5fa9881303eddb59efc8bbd /t/Nagios-Plugin-Range.t | |
parent | d8f912e8f5abb1476366cfea6e0fb368a9669ec4 (diff) | |
download | monitoring-plugin-perl-e548a22a92b3aa345f4a952fddb39cc693c35a70.tar.gz |
Rename NP::Base to NP::Functions; add check_messages() to NP::Functions.
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/Nagios-Plugin/trunk@1482 f882894a-f735-0410-b71e-b25c423dba1c
Diffstat (limited to 't/Nagios-Plugin-Range.t')
-rw-r--r-- | t/Nagios-Plugin-Range.t | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/t/Nagios-Plugin-Range.t b/t/Nagios-Plugin-Range.t index f01518d..df5dbd5 100644 --- a/t/Nagios-Plugin-Range.t +++ b/t/Nagios-Plugin-Range.t | |||
@@ -2,13 +2,17 @@ | |||
2 | use strict; | 2 | use strict; |
3 | use Test::More qw(no_plan); #tests => 123; | 3 | use Test::More qw(no_plan); #tests => 123; |
4 | 4 | ||
5 | BEGIN { use_ok('Nagios::Plugin::Range') }; | 5 | BEGIN { |
6 | use_ok('Nagios::Plugin::Range'); | ||
7 | # Silence warnings unless TEST_VERBOSE is set | ||
8 | $SIG{__WARN__} = sub { warn $_[0] if $ENV{TEST_VERBOSE} }; | ||
9 | }; | ||
6 | 10 | ||
7 | diag "\nusing Nagios::Plugin::Range revision ". $Nagios::Plugin::Range::VERSION . "\n"; | 11 | diag "\nusing Nagios::Plugin::Range revision ". $Nagios::Plugin::Range::VERSION . "\n" if $ENV{TEST_VERBOSE}; |
8 | 12 | ||
9 | my $r; | 13 | my $r; |
10 | 14 | ||
11 | diag "'garbage in' checks -- you should see 7 invalid range definition warnings here:"; | 15 | diag "'garbage in' checks -- you should see 7 invalid range definition warnings here:" if $ENV{TEST_VERBOSE}; |
12 | 16 | ||
13 | foreach (qw( | 17 | foreach (qw( |
14 | : | 18 | : |