--- AnyEvent/lib/AnyEvent.pm 2008/05/26 06:04:38 1.139 +++ AnyEvent/lib/AnyEvent.pm 2008/05/26 06:18:53 1.140 @@ -759,19 +759,6 @@ $ENV{PERL_ANYEVENT_PROTOCOLS} || "ipv4,ipv6"; } -sub import { - shift; - return unless @_; - - my $pkg = caller; - - no strict 'refs'; - - for (@_) { - *{"$pkg\::WIN32"} = *WIN32 if $_ eq "WIN32"; - } -} - my @models = ( [EV:: => AnyEvent::Impl::EV::], [Event:: => AnyEvent::Impl::Event::],