ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/AnyEvent-MP/eg/chat_server
(Generate patch)

Comparing AnyEvent-MP/eg/chat_server (file contents):
Revision 1.5 by root, Fri Aug 14 15:53:56 2009 UTC vs.
Revision 1.6 by root, Mon Aug 17 03:50:28 2009 UTC

1#!/opt/bin/perl 1#!/opt/bin/perl
2 2
3use common::sense; 3use common::sense;
4use AnyEvent::MP; 4use AnyEvent::MP;
5use AnyEvent::MP::Global;
5 6
6initialise_node; 7initialise_node;
8
9AnyEvent::MP::Global::register $NODE, "eg_chat_server";
7 10
8my %clients; 11my %clients;
9 12
10sub msg { 13sub msg {
11 print "relaying: $_[0]\n"; 14 print "relaying: $_[0]\n";

Diff Legend

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