… | … | ||
---|---|---|---|
7 | use AnyEvent::MP; | 7 | use AnyEvent::MP; |
8 | use AnyEvent::MP::Global; | 8 | use AnyEvent::MP::Global; |
9 | 9 | ||
10 | configure; | 10 | configure; |
11 | 11 | ||
12 | AnyEvent::MP::Global::register $NODE, "eg_chat_server2"; | 12 | grp_reg eg_chat_server2 => $NODE; |
13 | 13 | ||
14 | my %clients; | 14 | my %clients; |
15 | 15 | ||
16 | sub msg { | 16 | sub msg { |
17 | print "relaying: $_[0]\n"; | 17 | print "relaying: $_[0]\n"; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |