--- AnyEvent/lib/AnyEvent.pm	2009/08/09 00:20:35	1.274
+++ AnyEvent/lib/AnyEvent.pm	2009/08/09 13:27:23	1.277
@@ -808,12 +808,11 @@
 =item Backends that are autoprobed when no other event loop can be found.
 
 EV is the preferred backend when no other event loop seems to be in
-use. If EV is not installed, then AnyEvent will try Event, and, failing
-that, will fall back to its own pure-perl implementation, which is
-available everywhere as it comes with AnyEvent itself.
+use. If EV is not installed, then AnyEvent will fall back to its own
+pure-perl implementation, which is available everywhere as it comes with
+AnyEvent itself.
 
    AnyEvent::Impl::EV        based on EV (interface to libev, best choice).
-   AnyEvent::Impl::Event     based on Event, very stable, few glitches.
    AnyEvent::Impl::Perl      pure-perl implementation, fast and portable.
 
 =item Backends that are transparently being picked up when they are used.
@@ -824,6 +823,7 @@
 when the main program loads an event module before anything starts to
 create watchers. Nothing special needs to be done by the main program.
 
+   AnyEvent::Impl::Event     based on Event, very stable, few glitches.
    AnyEvent::Impl::Glib      based on Glib, slow but very stable.
    AnyEvent::Impl::Tk        based on Tk, very broken.
    AnyEvent::Impl::EventLib  based on Event::Lib, leaks memory and worse.
@@ -1153,11 +1153,11 @@
 
 my @models = (
    [EV::                   => AnyEvent::Impl::EV::   , 1],
-   [Event::                => AnyEvent::Impl::Event::, 1],
    [AnyEvent::Impl::Perl:: => AnyEvent::Impl::Perl:: , 1],
    # everything below here will not (normally) be autoprobed
    # as the pureperl backend should work everywhere
    # and is usually faster
+   [Event::                => AnyEvent::Impl::Event::, 1],
    [Glib::                 => AnyEvent::Impl::Glib:: , 1], # becomes extremely slow with many watchers
    [Event::Lib::           => AnyEvent::Impl::EventLib::], # too buggy
    [Irssi::                => AnyEvent::Impl::Irssi::],    # Irssi has a bogus "Event" package
@@ -1170,9 +1170,10 @@
    # byzantine signal and broken child handling, among others.
    # IO::Async is rather hard to detect, as it doesn't have any
    # obvious default class.
-#   [0, IO::Async::            => AnyEvent::Impl::IOAsync::],  # requires special main program
-#   [0, IO::Async::Loop::      => AnyEvent::Impl::IOAsync::],  # requires special main program
-#   [0, IO::Async::Notifier::  => AnyEvent::Impl::IOAsync::],  # requires special main program
+   [IO::Async::               => AnyEvent::Impl::IOAsync::], # requires special main program
+   [IO::Async::Loop::         => AnyEvent::Impl::IOAsync::], # requires special main program
+   [IO::Async::Notifier::     => AnyEvent::Impl::IOAsync::], # requires special main program
+   [AnyEvent::Impl::IOAsync:: => AnyEvent::Impl::IOAsync::], # requires special main program
 );
 
 our %method = map +($_ => 1),
@@ -1295,24 +1296,26 @@
 
 package AE;
 
+our $VERSION = $AnyEvent::VERSION;
+
 sub io($$$) {
    AnyEvent->io (fh => $_[0], poll => $_[1] ? "w" : "r", cb => $_[2])
 }
 
 sub timer($$$) {
-   AnyEvent->timer (after => $_[0], interval => $_[1], cb => $_[2]);
+   AnyEvent->timer (after => $_[0], interval => $_[1], cb => $_[2])
 }
 
 sub signal($$) {
-   AnyEvent->signal (signal => $_[0], cb => $_[1]);
+   AnyEvent->signal (signal => $_[0], cb => $_[1])
 }
 
 sub child($$) {
-   AnyEvent->child (pid => $_[0], cb => $_[1]);
+   AnyEvent->child (pid => $_[0], cb => $_[1])
 }
 
 sub idle($) {
-   AnyEvent->idle (cb => $_[0]);
+   AnyEvent->idle (cb => $_[0])
 }
 
 sub cv(;&) {