Patch for RT#74226

perl-YAML.spec

@@ -1,11 +1,14 @@
 Name:           perl-YAML
 Version:        0.81
-Release:        3%{?dist}
+Release:        4%{?dist}
 Summary:        YAML Ain't Markup Language (tm)
 License:        GPL+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/YAML/
 Source0:        http://search.cpan.org/CPAN/authors/id/I/IN/INGY/YAML-%{version}.tar.gz
+# https://rt.cpan.org/Public/Bug/Display.html?id=74226
+Patch0:         perl5.16-YAML-Any.patch
+
 BuildArch:      noarch
 BuildRequires:  perl(Carp)
 BuildRequires:  perl(constant)
@@ -27,6 +30,7 @@ specification.
 
 %prep
 %setup -q -n YAML-%{version}
+%patch0 -p1
 
 # Re-code docs as UTF-8
 iconv -f iso-8859-1 -t utf8 < README > README.utf8
@@ -59,6 +63,9 @@ make test
 %{_mandir}/man3/YAML*.3*
 
 %changelog
+* Fri Jun 22 2012 Jitka Plesnikova <jplesnik@redhat.com> 0.81-4
+- apply patch to for YAML::Any RT#74226
+
 * Wed Jun 06 2012 Petr Pisar <ppisar@redhat.com> - 0.81-3
 - Perl 5.16 rebuild
 

perl5.16-YAML-Any.patch

@@ -0,0 +1,12 @@
+diff -up YAML-0.81/lib/YAML/Any.pm.orig YAML-0.81/lib/YAML/Any.pm
+--- YAML-0.81/lib/YAML/Any.pm.orig	2012-06-22 11:05:12.770546934 +0200
++++ YAML-0.81/lib/YAML/Any.pm	2012-06-22 11:05:34.728670103 +0200
+@@ -95,7 +95,7 @@ sub LoadFile {
+ 
+ sub order {
+     return @YAML::Any::_TEST_ORDER
+-        if defined @YAML::Any::_TEST_ORDER;
++        if @YAML::Any::_TEST_ORDER;
+     return @implementations;
+ }
+