From 1b5ead8b894ae96f482c6792dd6e130a73fc5905 Mon Sep 17 00:00:00 2001
From: Jitka Plesnikova <jplesnik@redhat.com>
Date: Apr 30 2015 09:13:26 +0000
Subject: Stop using import from UNIVERSAL (RT#104119)


---

diff --git a/Text-BibTeX-0.70-Stop-using-import-from-UNIVERSAL.patch b/Text-BibTeX-0.70-Stop-using-import-from-UNIVERSAL.patch
new file mode 100644
index 0000000..ee29e1e
--- /dev/null
+++ b/Text-BibTeX-0.70-Stop-using-import-from-UNIVERSAL.patch
@@ -0,0 +1,20 @@
+diff -up Text-BibTeX-0.70/lib/Text/BibTeX/Value.pm.orig Text-BibTeX-0.70/lib/Text/BibTeX/Value.pm
+--- Text-BibTeX-0.70/lib/Text/BibTeX/Value.pm.orig	2015-04-30 10:13:15.785918161 +0200
++++ Text-BibTeX-0.70/lib/Text/BibTeX/Value.pm	2015-04-30 10:21:35.467626175 +0200
+@@ -18,7 +18,6 @@
+ package Text::BibTeX::Value;
+ 
+ use strict;
+-use UNIVERSAL 'isa';
+ use Carp;
+ 
+ use vars qw'$VERSION';
+@@ -206,7 +205,7 @@ sub new
+          if ref $sval eq 'ARRAY' && @$sval == 2;
+       croak "simple value is neither a two-element array ref " .
+             "nor a Text::BibTeX::SimpleValue object"
+-         unless isa ($sval, 'Text::BibTeX::SimpleValue');
++         unless ref $sval eq 'Text::BibTeX::SimpleValue';
+       push (@$self, $sval);
+    }
+ 
diff --git a/perl-Text-BibTeX.spec b/perl-Text-BibTeX.spec
index 1c9af2c..49a31a4 100644
--- a/perl-Text-BibTeX.spec
+++ b/perl-Text-BibTeX.spec
@@ -1,6 +1,6 @@
 Name:           perl-Text-BibTeX
 Version:        0.70
-Release:        4%{?dist}
+Release:        5%{?dist}
 Summary:        Interface to read and parse BibTeX files
 License:        GPL+ or Artistic
 Group:          Development/Libraries
@@ -8,6 +8,8 @@ URL:            http://search.cpan.org/dist/Text-BibTeX/
 Source0:        http://www.cpan.org/authors/id/A/AM/AMBS/Text-BibTeX-%{version}.tar.gz
 # fix build on non-x86 64-bit arches
 Patch0:         perl-Text-BibTeX-secondary.patch
+# Using import from UNIVERSAL is error now (RT#104119)
+Patch1:         Text-BibTeX-0.70-Stop-using-import-from-UNIVERSAL.patch
 BuildRequires:  perl
 BuildRequires:  perl(base)
 BuildRequires:  perl(lib)
@@ -73,6 +75,9 @@ chrpath -d $RPM_BUILD_ROOT%{_bindir}/*
 %{_libdir}/*.so
 
 %changelog
+* Thu Apr 30 2015 Jitka Plesnikova <jplesnik@redhat.com> 0.70-5
+- Stop using import from UNIVERSAL (RT#104119)
+
 * Sat Dec 13 2014 Dan Horák <dan[at]danny.cz> 0.70-4
 - fix build on non-x86 64-bit arches