[SCM] Debian packaging of libanyevent-perl branch, master, updated. debian/7.040-1-11-g5931bb1

Xavier Guimard x.guimard at free.fr
Sun May 12 13:26:35 UTC 2013


The following commit has been merged in the master branch:
commit 5931bb1797703976d8c979ad38cb4f5f834e7174
Author: Xavier Guimard <x.guimard at free.fr>
Date:   Sun May 12 15:24:27 2013 +0200

    Replace included comments in patch by a README.Debian as required by Jonas

diff --git a/debian/README.Debian b/debian/README.Debian
new file mode 100644
index 0000000..bc7fd6e
--- /dev/null
+++ b/debian/README.Debian
@@ -0,0 +1,13 @@
+Changes in source code
+----------------------
+
+libanyevent-perl has been patch to replace an hardcoded die into a warning.
+
+The problem has been reported here:
+ * http://bugs.debian.org/706453
+ * http://www.nntp.perl.org/group/perl.perl5.porters/2012/02/msg183037.html
+
+AnyEvent.pm hardcodes a die() if IO::Async::Loop::AnyEvent is in use but that
+code can work for som uses. So the file
+debian/patches/replace-abuse-die-by-warn.patch replace the "die" by a warning.
+
diff --git a/debian/changelog b/debian/changelog
index 7c16129..d762b9d 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,4 +1,4 @@
-libanyevent-perl (7.040-2) UNRELEASED; urgency=low
+libanyevent-perl (7.040-2) unstable; urgency=low
 
   [ Salvatore Bonaccorso ]
   * Change Vcs-Git to canonical URI (git://anonscm.debian.org)
@@ -13,7 +13,7 @@ libanyevent-perl (7.040-2) UNRELEASED; urgency=low
   * Add patch to replace hardcoded die by a warn if
     IO::Async::Loop::AnyEvent is in use (Closes: #706453)
 
- -- Salvatore Bonaccorso <carnil at debian.org>  Sun, 06 Jan 2013 21:56:52 +0100
+ -- Xavier Guimard <x.guimard at free.fr>  Sun, 12 May 2013 15:24:17 +0200
 
 libanyevent-perl (7.040-1) unstable; urgency=low
 
diff --git a/debian/patches/replace-abuse-die-by-warn.patch b/debian/patches/replace-abuse-die-by-warn.patch
index 739dd7f..b2c026a 100644
--- a/debian/patches/replace-abuse-die-by-warn.patch
+++ b/debian/patches/replace-abuse-die-by-warn.patch
@@ -6,26 +6,15 @@ Last-Update: 2013-05-01
 
 --- a/lib/AnyEvent.pm
 +++ b/lib/AnyEvent.pm
-@@ -1398,9 +1398,19 @@
+@@ -1398,7 +1398,10 @@
     # the author knows about the problems and what it does to AnyEvent as a whole
     # (and the ability of others to use AnyEvent), but simply wants to abuse AnyEvent
     # anyway.
 -   AnyEvent::log fatal => "IO::Async::Loop::AnyEvent detected - that module is broken by\n"
--                        . "design, abuses internals and breaks AnyEvent - will not continue."
--      if exists $INC{"IO/Async/Loop/AnyEvent.pm"};
-+ 
-+   # Debian change (Closes: #706453):
-+   # Ref: * http://www.nntp.perl.org/group/perl.perl5.porters/2012/02/msg183037.html
-+   #      * http://bugs.debian.org/706453
-+   # 
-+   # This might work so "AnyEvent::log fatal" is replaced by a warning
-+
-+   #AnyEvent::log fatal => "IO::Async::Loop::AnyEvent detected - that module is broken by\n"
-+   #                     . "design, abuses internals and breaks AnyEvent - will not continue."
-+   #   if exists $INC{"IO/Async/Loop/AnyEvent.pm"};
-+   AnyEvent::log 5 => "IO::Async::Loop::AnyEvent detected - that module can cause some\n"
-+                    . "problems with AnyEvent."
-+       if exists $INC{"IO/Async/Loop/AnyEvent.pm"};
++   #
++   # Debian change (see README.Debian):
++   # "AnyEvent::log fatal" is relaced by "AnyEvent::log 5"
++   AnyEvent::log 5 => "IO::Async::Loop::AnyEvent detected - that module is broken by\n"
+                         . "design, abuses internals and breaks AnyEvent - will not continue."
+       if exists $INC{"IO/Async/Loop/AnyEvent.pm"};
  
-    local $!; # for good measure
-    local $SIG{__DIE__}; # we use eval

-- 
Debian packaging of libanyevent-perl



More information about the Pkg-perl-cvs-commits mailing list