[ViewVC] Diff of: cvs/AnyEvent/lib/AnyEvent.pm

Comparing AnyEvent/lib/AnyEvent.pm (file contents):
Revision 1.28 by root, Sat Oct 27 15:10:09 2007 UTC vs.
Revision 1.30 by root, Fri Nov 2 19:12:02 2007 UTC

 C<AnyEvent::Impl:xxx> modules, but can be any other class in the case
 AnyEvent has been extended at runtime (e.g. in I<rxvt-unicode>).
 The known classes so far are:
+   EV::AnyEvent              based on EV (an interface to libev, best choice)
-   AnyEvent::Impl::Coro      based on Coro::Event, best choice.
+   AnyEvent::Impl::Coro      based on Coro::Event, second best choice.
-   EV::AnyEvent              based on EV (an interface to libevent)
-   AnyEvent::Impl::Event     based on Event, also best choice :)
+   AnyEvent::Impl::Event     based on Event, also second best choice :)
    AnyEvent::Impl::Glib      based on Glib, second-best choice.
    AnyEvent::Impl::Tk        based on Tk, very bad choice.
    AnyEvent::Impl::Perl      pure-perl implementation, inefficient.
 =item AnyEvent::detect
    my (undef, %arg) = @_;
    my $signal = uc $arg{signal}
       or Carp::croak "required option 'signal' is missing";
-   $SIG_CB{$signal}{$arg{cb}} = $arg{cb};
+   $SIG_CB{$signal}{$arg{cb} += 0} = $arg{cb};
    $SIG{$signal} ||= sub {
       $_->() for values %{ $SIG_CB{$signal} || {} };
    };
    bless [$signal, $arg{cb}], "AnyEvent::Base::Signal"
 our $PID_IDLE;
 our $WNOHANG;
 sub _child_wait {
    while (0 < (my $pid = waitpid -1, $WNOHANG)) {
-      $_->() for values %{ (delete $PID_CB{$pid}) || {} };
+      $_->() for values %{ $PID_CB{$pid} || {} }, %{ $PID_CB{0} || {} };
    }
    undef $PID_IDLE;
 }

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines