~ubuntu-branches/ubuntu/utopic/libanyevent-perl/utopic-proposed

« back to all changes in this revision

Viewing changes to debian/patches/replace-abuse-die-with-warn.patch

  • Committer: Package Import Robot
  • Author(s): Xavier Guimard, Salvatore Bonaccorso, gregor herrmann, Xavier Guimard
  • Date: 2013-05-17 06:37:38 UTC
  • Revision ID: package-import@ubuntu.com-20130517063738-22hre4g4p3etomfu
Tags: 7.040-2
[ Salvatore Bonaccorso ]
* Change Vcs-Git to canonical URI (git://anonscm.debian.org)
* Change search.cpan.org based URIs to metacpan.org based URIs

[ gregor herrmann ]
* Move libasync-interrupt-perl, libev-perl, libguard-perl from
  Suggests to Recommends. Thanks to Jonas Smedegaard for the bug report.
  (Closes: #705742)

[ Xavier Guimard ]
* Add patch to replace hardcoded die by a warn if
  IO::Async::Loop::AnyEvent is in use (Closes: #706453)
* Re-order dependencies to recommend one of libev-perl or libevent-perl
* Update description to document Suggests (Closes: #705744)

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
Description: replace hardcoded die by a warn if IO::Async::Loop::AnyEvent is in use
 
2
Author: Xavier Guimard <x.guimard@free.fr>
 
3
Bug-Debian: http://bugs.debian.org/706453
 
4
Forwarded: http://www.nntp.perl.org/group/perl.perl5.porters/2012/02/msg183037.html
 
5
Last-Update: 2013-05-01
 
6
 
 
7
--- a/lib/AnyEvent.pm
 
8
+++ b/lib/AnyEvent.pm
 
9
@@ -1398,7 +1398,10 @@
 
10
    # the author knows about the problems and what it does to AnyEvent as a whole
 
11
    # (and the ability of others to use AnyEvent), but simply wants to abuse AnyEvent
 
12
    # anyway.
 
13
-   AnyEvent::log fatal => "IO::Async::Loop::AnyEvent detected - that module is broken by\n"
 
14
+   #
 
15
+   # Debian change (see README.Debian):
 
16
+   # "AnyEvent::log fatal" is relaced by "AnyEvent::log 5"
 
17
+   AnyEvent::log 5 => "IO::Async::Loop::AnyEvent detected - that module is broken by\n"
 
18
                         . "design, abuses internals and breaks AnyEvent - will not continue."
 
19
       if exists $INC{"IO/Async/Loop/AnyEvent.pm"};
 
20