--- cvsroot/Coro/Coro.pm	2006/12/01 19:41:06	1.93
+++ cvsroot/Coro/Coro.pm	2006/12/02 18:01:30	1.94
@@ -256,14 +256,14 @@
 
 =cut
 
-sub _new_coro {
+sub _run_coro {
    terminate &{+shift};
 }
 
 sub new {
    my $class = shift;
 
-   $class->SUPER::new (\&_new_coro, @_)
+   $class->SUPER::new (\&_run_coro, @_)
 }
 
 =item $success = $coroutine->ready