--- CV/lib/Gtk2/CV.pm	2006/10/28 01:26:09	1.30
+++ CV/lib/Gtk2/CV.pm	2006/10/28 23:09:02	1.31
@@ -16,6 +16,7 @@
 my $aio_source;
 
 IO::AIO::min_parallel 32;
+IO::AIO::max_poll_time 0.01;
 
 # we use a low priority watcher to give GUI interactions as high a priority
 # as possible.
@@ -23,8 +24,8 @@
    $aio_source ||=
       add_watch Glib::IO IO::AIO::poll_fileno,
          in => sub {
-            eval { IO::AIO::poll_some 64 };
-            warn $@ if $q;#d#
+            eval { IO::AIO::poll_cb };
+            warn $@ if $@;#d#
             1
          },
          undef,