--- cvsroot/Coro/Coro.pm 2008/11/16 00:55:41 1.219 +++ cvsroot/Coro/Coro.pm 2008/11/16 11:12:57 1.220 @@ -88,13 +88,13 @@ =cut -$main = new Coro; +# $main is now being initialised by Coro::State =item $Coro::current The coroutine object representing the current coroutine (the last coroutine that the Coro scheduler switched to). The initial value is -C<$main> (of course). +C<$Coro::main> (of course). This variable is B I. You can take copies of the value stored in it and use it as any other coroutine object, but you must @@ -102,14 +102,6 @@ =cut -$main->{desc} = "[main::]"; - -# maybe some other module used Coro::Specific before... -$main->{_specific} = $current->{_specific} - if $current; - -_set_current $main; - sub current() { $current } # [DEPRECATED] =item $Coro::idle