… | … | ||
---|---|---|---|
6 | 6 | ||
7 | use Carp qw(croak); | 7 | use Carp qw(croak); |
8 | use AnyEvent (); | 8 | use AnyEvent (); |
9 | 9 | ||
10 | AnyEvent::post_detect { | 10 | AnyEvent::post_detect { |
11 | # assume the first ISA member is the implementation | ||
12 | # # and link us in before it in the chain. | ||
11 | my $MODEL = shift @AnyEvent::ISA; | 13 | my $MODEL = shift @AnyEvent::ISA; |
12 | unshift @ISA, $MODEL; | 14 | unshift @ISA, $MODEL; |
13 | unshift @AnyEvent::ISA, AnyEvent::Strict:: | 15 | unshift @AnyEvent::ISA, AnyEvent::Strict:: |
14 | }; | 16 | }; |
15 | 17 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |