ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/AnyEvent-MP/MP/LogCatcher.pm
(Generate patch)

Comparing AnyEvent-MP/MP/LogCatcher.pm (file contents):
Revision 1.1 by root, Sun Sep 6 00:13:21 2009 UTC vs.
Revision 1.2 by root, Sun Sep 6 00:13:51 2009 UTC

… …
77 77
78 # establish connection 78 # establish connection
79 my $rport = spawn $node, "AnyEvent::MP::LogCatcher::connect", 0, $lport, $LOGLEVEL; 79 my $rport = spawn $node, "AnyEvent::MP::LogCatcher::connect", 0, $lport, $LOGLEVEL;
80 80
81 mon $rport, $lport; 81 mon $rport, $lport;
82 mon $lport, sub {
83 warn "$lport $rport <@_>\n";#d#
84 };
85} 82}
86 83
87sub catch { 84sub catch {
88 $LOGLEVEL = $_[0]; 85 $LOGLEVEL = $_[0];
89 kil $_, "restart" for values %lport; 86 kil $_, "restart" for values %lport;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines