From 5b2ab7f928b17b2013bdc914e36f7c2314f7b922 Mon Sep 17 00:00:00 2001
From: Sven Nierlein <sven@nierlein.de>
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 <sven@nierlein.de>
---
 t/Monitoring-Plugin-Functions-01.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 't')

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 v1.2.3-74-g34f1