--- IO-AIO/AIO.pm	2005/07/10 22:20:55	1.9
+++ IO-AIO/AIO.pm	2005/07/11 00:51:32	1.11
@@ -30,6 +30,11 @@
  Tk::Event::IO->fileevent (IO::AIO::poll_fileno, "",
                            readable => \&IO::AIO::poll_cb);
 
+ # Danga::Socket
+ Danga::Socket->AddOtherFds (IO::AIO::poll_fileno =>
+                             \&IO::AIO::poll_cb);
+
+
 =head1 DESCRIPTION
 
 This module implements asynchronous I/O using whatever means your
@@ -56,7 +61,7 @@
 use Fcntl ();
 
 BEGIN {
-   $VERSION = 0.2;
+   $VERSION = 0.3;
 
    @EXPORT = qw(aio_read aio_write aio_open aio_close aio_stat aio_lstat aio_unlink
                 aio_fsync aio_fdatasync aio_readahead);