8
0

Accepting request 327317 from home:hsk17:branches:devel:languages:perl

patch test to work with perl-5.22

OBS-URL: https://build.opensuse.org/request/show/327317
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Nagios-Plugin?expand=0&rev=22
This commit is contained in:
Stephan Kulow
2015-08-27 13:31:43 +00:00
committed by Git OBS Bridge
parent c8cca5fa9b
commit fdd829a00b
3 changed files with 18 additions and 0 deletions

11
perl522.patch Normal file
View File

@@ -0,0 +1,11 @@
--- a/Nagios-Plugin-0.36/t/Nagios-Plugin-Functions-01.t 2010-12-03 12:46:21.000000000 +0100
+++ b/Nagios-Plugin-0.36/t/Nagios-Plugin-Functions-01.t 2015-08-27 12:16:13.649140550 +0200
@@ -19,7 +19,7 @@
is(get_shortname, "NAGIOS-PLUGIN-FUNCTIONS-01", "get_shortname ok");
# Hardcoded checks of constants
-ok(defined %ERRORS, '%ERRORS defined');
+ok(%ERRORS, '%ERRORS defined');
is(OK, $ERRORS{OK}, "OK => $ERRORS{OK}");
is(WARNING, $ERRORS{WARNING}, "WARNING => $ERRORS{WARNING}");
is(CRITICAL, $ERRORS{CRITICAL}, "CRITICAL => $ERRORS{CRITICAL}");