summaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
authorTon Voon <tonvoon@users.sourceforge.net>2008-11-21 01:35:04 +0000
committerTon Voon <tonvoon@users.sourceforge.net>2008-11-21 01:35:04 +0000
commit3ae2f969910f6b0dbcd1b85b667f223f87ea2757 (patch)
tree12e3e724fcc9b30bd641e158183a8a88d16d60eb /t
parent96e9e6710ff0e4a0b0354c44e9e0aec4ee8fc7cd (diff)
downloadmonitoring-plugin-perl-3ae2f969910f6b0dbcd1b85b667f223f87ea2757.tar.gz
Fixed test problems against Test::More 0.86
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/Nagios-Plugin/trunk@2089 f882894a-f735-0410-b71e-b25c423dba1c
Diffstat (limited to 't')
-rw-r--r--t/Nagios-Plugin-Performance.t6
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");
130cmp_ok( $p[0]->uom, "eq", "s", "uom okay"); 130cmp_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");
133cmp_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
134cmp_ok( $p[0]->threshold->critical, 'eq', "0", "crit okay"); 134# of 0. See http://rt.cpan.org/Ticket/Display.html?id=41109
135is( $p[0]->threshold->warning, "0", "warn okay");
136is( $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");
137cmp_ok( $p[0]->label, "eq", "pct_used", "label okay"); 139cmp_ok( $p[0]->label, "eq", "pct_used", "label okay");