--- Coro/Coro.pm	2001/09/16 01:34:35	1.34
+++ Coro/Coro.pm	2001/09/24 00:16:30	1.35
@@ -231,6 +231,7 @@
 sub cancel {
    push @destroy, $_[0];
    $manager->ready;
+   &schedule if $current == $_[0];
 }
 
 =item $oldprio = $process->prio($newprio)