From e26c20746be0018e4be55366d0d0b5c74a048901 Mon Sep 17 00:00:00 2001 From: Silvan Calarco Date: Sat, 6 Jan 2024 08:56:43 +0100 Subject: [PATCH] rebuilt with patch against libevent 2.1 [release 1.03-5mamba;Sun Dec 06 2020] --- perl-Event-Lib-1.03-libevent-2.1.patch | 38 ++++++++++++++++++++++++++ perl-Event-Lib.spec | 10 +++++-- 2 files changed, 45 insertions(+), 3 deletions(-) create mode 100644 perl-Event-Lib-1.03-libevent-2.1.patch diff --git a/perl-Event-Lib-1.03-libevent-2.1.patch b/perl-Event-Lib-1.03-libevent-2.1.patch new file mode 100644 index 0000000..7e0e0ac --- /dev/null +++ b/perl-Event-Lib-1.03-libevent-2.1.patch @@ -0,0 +1,38 @@ +--- Event-Lib-1.04/Lib.xs~ 2014-09-23 09:06:55.000000000 +0200 ++++ Event-Lib-1.04/Lib.xs 2017-04-04 19:35:35.623351764 +0200 +@@ -128,7 +128,7 @@ + void refresh_event (struct event_args *args, char *class) { + SV *sv = newSV(0); + sv_setref_pv(sv, class, (void*)args); +- args->ev.ev_arg = (void*)sv; ++ args->ev.ev_evcallback.evcb_arg = (void*)sv; + } + + SV * do_exception_handler (pTHX_ short event, SV *ev, SV *err) { +@@ -208,7 +208,7 @@ + * handlers, in which case the ref-cnt has already been decremented */ + if (!event_pending(&args->ev, event, NULL)) { + EvEVENT_SET_off(args); +- SvREFCNT_dec((SV*)args->ev.ev_arg); ++ SvREFCNT_dec((SV*)args->ev.ev_evcallback.evcb_arg); + if (SvOK(ev)) + DEBUG_trace(args); + } +@@ -582,7 +582,7 @@ + } + + /* Nope, it's another event so it's ok to increment the ref-cnt */ +- SvREFCNT_inc((SV*)args->ev.ev_arg); ++ SvREFCNT_inc((SV*)args->ev.ev_evcallback.evcb_arg); + DEBUG_record_event(aTHX_ ST(0)); + DEBUG_trace(args); + XSRETURN(1); +@@ -689,7 +689,7 @@ + /* We are not using ST(0) here but instead the loop-back + * object stored inside the event because this is what is + * decremented in do_callback and incremented in event_add */ +- SvREFCNT_dec((SV*)args->ev.ev_arg); ++ SvREFCNT_dec((SV*)args->ev.ev_evcallback.evcb_arg); + + DEBUG_trace(args); + } diff --git a/perl-Event-Lib.spec b/perl-Event-Lib.spec index 72b2a5a..50a1863 100644 --- a/perl-Event-Lib.spec +++ b/perl-Event-Lib.spec @@ -2,18 +2,18 @@ Name: perl-Event-Lib Version: 1.03 -Release: 4mamba +Release: 5mamba Summary: Event::Lib - Perl wrapper around libevent Group: System/Libraries/Perl Vendor: openmamba Distribution: openmamba -Packager: Automatic Build System +Packager: Silvan Calarco URL: http://www.cpan.org Source: http://search.cpan.org/CPAN/authors/id/V/VP/VPARSEVAL/Event-Lib-%{version}.tar.gz Patch0: %{name}-1.03-arm-fix-missing-off64_t.patch +Patch1: perl-Event-Lib-1.03-libevent-2.1.patch License: Artistic, GPL Requires: perl >= %perl_major_ver - ## AUTOBUILDREQ-BEGIN BuildRequires: glibc-devel BuildRequires: libevent-devel @@ -29,6 +29,7 @@ This module is a Perl wrapper around libevent as available from http://monkey.or %prep %setup -q -n Event-Lib-%{version} %patch0 -p1 +%patch1 -p1 %build perl Makefile.PL PREFIX=%{_prefix} INSTALLDIRS=vendor @@ -56,6 +57,9 @@ rm -f .packlist %defattr(-,root,root) %changelog +* Sun Dec 06 2020 Silvan Calarco 1.03-5mamba +- rebuilt with patch against libevent 2.1 + * Wed Nov 09 2016 Silvan Calarco 1.03-4mamba - rebuilt with perl 5.24