--- googlecode.com/svn/trunk/Meteor/Message.pm 2006/12/14 16:29:42 11 +++ googlecode.com/svn/trunk/Meteor/Message.pm 2007/05/20 19:40:53 25 @@ -62,6 +62,8 @@ $self->{'id'}=$id; $self->{'text'}=$text; + $::Statistics->{'unique_messages'}++; + &::syslog('debug',"New message $id"); $self; @@ -77,6 +79,17 @@ $self->{'text'}=$text; } +sub channelName { + shift->{'channel'}; +} + +sub setChannelName { + my $self=shift; + my $channelName=shift || ''; + + $self->{'channel'}=$channelName; +} + sub text { shift->{'text'}; }