diff options
Diffstat (limited to 't/Monitoring-Plugin-Functions-01.t')
-rw-r--r-- | t/Monitoring-Plugin-Functions-01.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/Monitoring-Plugin-Functions-01.t b/t/Monitoring-Plugin-Functions-01.t index 084ad28..d99dcf7 100644 --- a/t/Monitoring-Plugin-Functions-01.t +++ b/t/Monitoring-Plugin-Functions-01.t | |||
@@ -19,7 +19,7 @@ foreach my $m ("", qw(::Threshold ::Getopt ::Performance ::Range)) { | |||
19 | is(get_shortname, "MONITORING-PLUGIN-FUNCTIONS-01", "get_shortname ok"); | 19 | is(get_shortname, "MONITORING-PLUGIN-FUNCTIONS-01", "get_shortname ok"); |
20 | 20 | ||
21 | # Hardcoded checks of constants | 21 | # Hardcoded checks of constants |
22 | ok(%ERRORS, '%ERRORS defined'); | 22 | ok(defined %ERRORS, '%ERRORS defined'); |
23 | is(OK, $ERRORS{OK}, "OK => $ERRORS{OK}"); | 23 | is(OK, $ERRORS{OK}, "OK => $ERRORS{OK}"); |
24 | is(WARNING, $ERRORS{WARNING}, "WARNING => $ERRORS{WARNING}"); | 24 | is(WARNING, $ERRORS{WARNING}, "WARNING => $ERRORS{WARNING}"); |
25 | is(CRITICAL, $ERRORS{CRITICAL}, "CRITICAL => $ERRORS{CRITICAL}"); | 25 | is(CRITICAL, $ERRORS{CRITICAL}, "CRITICAL => $ERRORS{CRITICAL}"); |