commit 05af753bf783cf20082478d1bf8cb61f7cf5be98
Author: Nicolas Chauvet <kwizart@xxxxxxxxx>
Date: Sat May 18 10:10:28 2013 +0200
Add patch to fix Segfault
lib-event.patch | 20 ++++++++++++++++++++
perl-Event-Lib.spec | 8 +++++++-
2 files changed, 27 insertions(+), 1 deletions(-)
---
diff --git a/lib-event.patch b/lib-event.patch
new file mode 100644
index 0000000..4127e43
--- /dev/null
+++ b/lib-event.patch
@@ -0,0 +1,20 @@
+---
+ Lib.xs | 2 +-
+ 1 files changed, 1 insertions(+), 1 deletions(-)
+
+diff --git a/Lib.xs b/Lib.xs
+index ac3ae5c..d014744 100644
+--- a/Lib.xs
++++ b/Lib.xs
+@@ -255,7 +255,7 @@ int EVENT_INIT_DONE = -1; /* we use the pid here */
+
+ #define event_do_init() \
+ {\
+- int _pid_ = SvIV(get_sv("$", FALSE)); \
++ int _pid_ = getpid(); \
+ if (!EVENT_INIT_DONE || EVENT_INIT_DONE != _pid_) {\
+ event_init(); \
+ DEBUG_init_pending(aTHX); \
+--
+1.7.0.4
+
diff --git a/perl-Event-Lib.spec b/perl-Event-Lib.spec
index 81e530e..d557eec 100644
--- a/perl-Event-Lib.spec
+++ b/perl-Event-Lib.spec
@@ -1,12 +1,14 @@
Name: perl-Event-Lib
Version: 1.03
-Release: 19%{?dist}
+Release: 20%{?dist}
Summary: Perl wrapper around libevent
Group: Development/Libraries
License: GPL+ or Artistic
URL: http://search.cpan.org/dist/Event-Lib/
Source0: http://search.cpan.org/CPAN/authors/id/V/VP/VPARSEVAL/Event-Lib-%{version}.tar.gz
+#https://rt.cpan.org/Public/Bug/Display.html?id=80644
+Patch0: https://rt.cpan.org/Ticket/Attachment/1136922/598341/lib-event.patch
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
BuildRequires: perl(ExtUtils::MakeMaker)
@@ -26,6 +28,7 @@ received.
%prep
%setup -q -n Event-Lib-%{version}
+%patch0 -p1 -b .orig
%build
@@ -64,6 +67,9 @@ rm -rf $RPM_BUILD_ROOT
%changelog
+* Sat May 18 2013 Nicolas Chauvet <kwizart@xxxxxxxxx> - 1.03-20
+- Fix segfault with perl 5.16 - rhbz#958361
+
* Thu Feb 14 2013 Fedora Release Engineering <rel-eng@xxxxxxxxxxxxxxxxxxxxxxx> - 1.03-19
- Rebuilt for https://fedoraproject.org/wiki/Fedora_19_Mass_Rebuild
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@xxxxxxxxxxxxxxxxxxxxxxx
https://admin.fedoraproject.org/mailman/listinfo/perl-devel
