diff options
Diffstat (limited to 't/Nagios-Plugin-Performance.t')
-rw-r--r-- | t/Nagios-Plugin-Performance.t | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/t/Nagios-Plugin-Performance.t b/t/Nagios-Plugin-Performance.t index 0c9ab74..fa36ce0 100644 --- a/t/Nagios-Plugin-Performance.t +++ b/t/Nagios-Plugin-Performance.t | |||
@@ -130,8 +130,10 @@ cmp_ok( $p[0]->value, "eq", "0.002722", "value okay"); | |||
130 | cmp_ok( $p[0]->uom, "eq", "s", "uom okay"); | 130 | cmp_ok( $p[0]->uom, "eq", "s", "uom okay"); |
131 | ok( defined $p[0]->threshold->warning->is_set, "Warning range has been set"); | 131 | ok( defined $p[0]->threshold->warning->is_set, "Warning range has been set"); |
132 | ok( defined $p[0]->threshold->critical->is_set, "Critical range has been set"); | 132 | ok( defined $p[0]->threshold->critical->is_set, "Critical range has been set"); |
133 | cmp_ok( $p[0]->threshold->warning, 'eq', "0", "warn okay"); | 133 | # The two below used to be cmp_ok, but Test::More 0.86 appears to have a problem with a stringification |
134 | cmp_ok( $p[0]->threshold->critical, 'eq', "0", "crit okay"); | 134 | # of 0. See http://rt.cpan.org/Ticket/Display.html?id=41109 |
135 | is( $p[0]->threshold->warning, "0", "warn okay"); | ||
136 | is( $p[0]->threshold->critical, "0", "crit okay"); | ||
135 | 137 | ||
136 | @p = Nagios::Plugin::Performance->parse_perfstring("pct_used=73.7%;90;95"); | 138 | @p = Nagios::Plugin::Performance->parse_perfstring("pct_used=73.7%;90;95"); |
137 | cmp_ok( $p[0]->label, "eq", "pct_used", "label okay"); | 139 | cmp_ok( $p[0]->label, "eq", "pct_used", "label okay"); |