From 3b9603892445d2585d805dc97530c7e4f2c1242f Mon Sep 17 00:00:00 2001
From: Jitka Plesnikova <jples...@redhat.com>
Date: Wed, 10 Aug 2016 09:48:28 +0200
Subject: Load IO::Socket::INET in Server.pm

---
 Gearman-Server-v1.130.1-Load-IO-Socket-INET.patch | 11 +++++++++++
 perl-Gearman-Server.spec                          |  8 +++++++-
 2 files changed, 18 insertions(+), 1 deletion(-)
 create mode 100644 Gearman-Server-v1.130.1-Load-IO-Socket-INET.patch

diff --git a/Gearman-Server-v1.130.1-Load-IO-Socket-INET.patch 
b/Gearman-Server-v1.130.1-Load-IO-Socket-INET.patch
new file mode 100644
index 0000000..82e688b
--- /dev/null
+++ b/Gearman-Server-v1.130.1-Load-IO-Socket-INET.patch
@@ -0,0 +1,11 @@
+diff -up Gearman-Server-v1.130.1/lib/Gearman/Server.pm.orig 
Gearman-Server-v1.130.1/lib/Gearman/Server.pm
+--- Gearman-Server-v1.130.1/lib/Gearman/Server.pm.orig 2016-08-10 
09:13:57.075431713 +0200
++++ Gearman-Server-v1.130.1/lib/Gearman/Server.pm      2016-08-10 
09:14:55.335099921 +0200
+@@ -33,6 +33,7 @@ use Gearman::Server::Client;
+ use Gearman::Server::Listener;
+ use Gearman::Server::Job;
+ use IO::Handle ();
++use IO::Socket::INET;
+ use Socket qw/
+     IPPROTO_TCP
+     SOL_SOCKET
diff --git a/perl-Gearman-Server.spec b/perl-Gearman-Server.spec
index 6026adc..31ee236 100644
--- a/perl-Gearman-Server.spec
+++ b/perl-Gearman-Server.spec
@@ -1,6 +1,6 @@
 Name:           perl-Gearman-Server
 Version:        1.130.1
-Release:        1%{?dist}
+Release:        2%{?dist}
 Summary:        Function call router and load balancer
 License:        GPL+ or Artistic
 Group:          System Environment/Daemons
@@ -8,6 +8,8 @@ URL:            http://search.cpan.org/dist/Gearman-Server/
 Source0:        
http://search.cpan.org/CPAN/authors/id/P/PA/PALIK/Gearman-Server-v%{version}.tar.gz
 # Use absolute interpreter
 Patch0:         Gearman-Server-v1.130.0-Do-not-use-usr-bin-env.patch
+# Load IO::Socket::INET in Gearman/Server.pm
+Patch1:         Gearman-Server-v1.130.1-Load-IO-Socket-INET.patch
 BuildArch:      noarch
 BuildRequires:  findutils
 BuildRequires:  make
@@ -52,6 +54,7 @@ one of the Gearman servers.
 %prep
 %setup -q -n Gearman-Server-v%{version}
 %patch0 -p1
+%patch1 -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor
@@ -73,6 +76,9 @@ make test
 %{_mandir}/man3/Gearman::*.*
 
 %changelog
+* Wed Aug 10 2016 Jitka Plesnikova <jples...@redhat.com> - 1.130.1-2
+- Load IO::Socket::INET in Server.pm
+
 * Tue Jul 12 2016 Petr Pisar <ppi...@redhat.com> - 1.130.1-1
 - 1.130.1 bump
 
-- 
cgit v0.12


        
http://pkgs.fedoraproject.org/cgit/perl-Gearman-Server.git/commit/?h=f23&id=3b9603892445d2585d805dc97530c7e4f2c1242f
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@lists.fedoraproject.org
https://lists.fedoraproject.org/admin/lists/perl-devel@lists.fedoraproject.org

Reply via email to