Bug#706453: libanyevent-perl: AnyEvent.pm hardcodes a die() if IO::Async::Loop::AnyEvent is in use

[Matt S Trout]

Package: libanyevent-perl
Version: 7.04
Severity: important


https://metacpan.org/source/MLEHMANN/AnyEvent-7.04/lib/AnyEvent.pm#L1398

   # IO::Async::Loop::AnyEvent is extremely evil, refuse to work with it
   # 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"};

This is a lie. That code *can* work for some uses.

As such, it is a bug that the user is denied the choice.

-- System Information:
Debian Release: 5.0.10
  APT prefers oldstable
  APT policy: (500, 'oldstable')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.26-2-amd64 (SMP w/4 CPU cores)
Locale: LANG=en_GB.utf8, LC_CTYPE=en_GB.utf8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash