--- Coro/Coro.pm	2007/10/06 01:11:01	1.150
+++ Coro/Coro.pm	2007/10/06 19:25:00	1.151
@@ -52,7 +52,7 @@
 our $main;    # main coroutine
 our $current; # current coroutine
 
-our $VERSION = '4.02';
+our $VERSION = '4.03';
 
 our @EXPORT = qw(async async_pool cede schedule terminate current unblock_sub);
 our %EXPORT_TAGS = (
@@ -257,7 +257,7 @@
          }
       };
 
-      last if $@ eq "\3terminate\2\n";
+      last if $@ eq "\3async_pool terminate\2\n";
       warn $@ if $@;
    }
 }