--- CV/lib/Gtk2/CV.pm	2006/10/22 21:51:13	1.27
+++ CV/lib/Gtk2/CV.pm	2006/10/22 22:17:53	1.28
@@ -15,14 +15,18 @@
 
 my $aio_source;
 
-# we use a low priority to give GUI interactions as high a priority
+# we use a low priority watcher to give GUI interactions as high a priority
 # as possible.
 sub enable_aio {
    $aio_source ||=
       add_watch Glib::IO IO::AIO::poll_fileno,
-                         in => sub { IO::AIO::poll_cb; 1 },
-                         undef,
-                         &Glib::G_PRIORITY_LOW;
+         in => sub {
+            eval { IO::AIO::poll_cb };
+            warn $@ if $q;#d#
+            1
+         },
+         undef,
+         &Glib::G_PRIORITY_LOW;
 }
 
 sub disable_aio {