--- AnyEvent/lib/AnyEvent.pm	2005/12/01 18:56:18	1.2
+++ AnyEvent/lib/AnyEvent.pm	2005/12/01 21:19:58	1.3
@@ -54,7 +54,7 @@
 use strict 'vars';
 use Carp;
 
-our $VERSION = 0.1;
+our $VERSION = 0.2;
 our $MODEL;
 
 our $AUTOLOAD;
@@ -67,9 +67,14 @@
       [Tk    => Tk::],
 );
 
+our %method = map +($_ => 1), qw(io timer condvar broadcast wait cancel DESTROY);
+
 sub AUTOLOAD {
    $AUTOLOAD =~ s/.*://;
 
+   $method{$AUTOLOAD}
+      or croak "$AUTOLOAD: not a valid method for AnyEvent objects";
+
    unless ($MODEL) {
       # check for already loaded models
       for (@models) {