diff options
| author | Gavin Carr <gonzai@users.sourceforge.net> | 2007-03-14 23:47:23 (GMT) |
|---|---|---|
| committer | Gavin Carr <gonzai@users.sourceforge.net> | 2007-03-14 23:47:23 (GMT) |
| commit | e5109f99c9657a1a8e9fb32b19254a417e2ccd65 (patch) | |
| tree | 2fdbad42f466051ffc2e332cf0a2573976e3a56c /t/Nagios-Plugin-Threshold.t | |
| parent | 489df48f9d1891b46ae4be911080ab4667058f2d (diff) | |
| download | monitoring-plugin-perl-e5109f99c9657a1a8e9fb32b19254a417e2ccd65.tar.gz | |
Refactor N::P::Performance; cleanups to Threshold and Range (mostly perldocs).
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/Nagios-Plugin/trunk@1640 f882894a-f735-0410-b71e-b25c423dba1c
Diffstat (limited to 't/Nagios-Plugin-Threshold.t')
| -rw-r--r-- | t/Nagios-Plugin-Threshold.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/Nagios-Plugin-Threshold.t b/t/Nagios-Plugin-Threshold.t index cdb8d77..ccb53eb 100644 --- a/t/Nagios-Plugin-Threshold.t +++ b/t/Nagios-Plugin-Threshold.t | |||
| @@ -113,7 +113,7 @@ SKIP_DEATH: | |||
| 113 | 113 | ||
| 114 | diag "threshold: critical if > 25 " if $ENV{TEST_VERBOSE}; | 114 | diag "threshold: critical if > 25 " if $ENV{TEST_VERBOSE}; |
| 115 | $t = Nagios::Plugin::Threshold->set_thresholds( critical => "~:25" ); | 115 | $t = Nagios::Plugin::Threshold->set_thresholds( critical => "~:25" ); |
| 116 | ok( defined $t, "Threshold ('', '~:25') set (".$t->critical->stringify().")" ); | 116 | ok( defined $t, "Threshold ('', '~:25') set (".$t->critical.")" ); |
| 117 | ok( ! $t->warning->is_set, "Warning not set"); | 117 | ok( ! $t->warning->is_set, "Warning not set"); |
| 118 | cmp_ok( $t->critical->end, '==',25, "Critical end set"); | 118 | cmp_ok( $t->critical->end, '==',25, "Critical end set"); |
| 119 | ok $t->critical->start_infinity, "Critical starts at negative infinity"; | 119 | ok $t->critical->start_infinity, "Critical starts at negative infinity"; |