From 5b2ab7f928b17b2013bdc914e36f7c2314f7b922 Mon Sep 17 00:00:00 2001 From: Sven Nierlein Date: Mon, 30 Mar 2015 17:32:53 +0200 Subject: fix warning in function tests fixes https://rt.cpan.org/Ticket/Display.html?id=103190 Signed-off-by: Sven Nierlein 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)) { is(get_shortname, "MONITORING-PLUGIN-FUNCTIONS-01", "get_shortname ok"); # Hardcoded checks of constants -ok(%ERRORS, '%ERRORS defined'); +ok(defined %ERRORS, '%ERRORS defined'); is(OK, $ERRORS{OK}, "OK => $ERRORS{OK}"); is(WARNING, $ERRORS{WARNING}, "WARNING => $ERRORS{WARNING}"); is(CRITICAL, $ERRORS{CRITICAL}, "CRITICAL => $ERRORS{CRITICAL}"); -- cgit v0.10-9-g596f