Parent Directory | Revision Log | Patch
revision 43 by knops.gerd, Sun Feb 3 23:24:26 2008 UTC | revision 46 by knops.gerd, Mon Feb 4 19:24:25 2008 UTC | |
---|---|---|
# | Line 90 sub processLine { | Line 90 sub processLine { |
90 | ||
91 | my $channelName=$1; | my $channelName=$1; |
92 | my $channel=Meteor::Channel->channelWithName($channelName); | my $channel=Meteor::Channel->channelWithName($channelName); |
93 | $channel->addMessage($line); | my $msg=$channel->addMessage($line); |
94 | $self->write("OK$::CRLF"); | my $msgID=$msg->id(); |
95 | $self->write("OK\t$msgID$::CRLF"); | |
96 | } | } |
97 | elsif($cmd eq 'COUNTSUBSCRIBERS') | elsif($cmd eq 'COUNTSUBSCRIBERS') |
98 | { | { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |