/[meteor]/trunk/Meteor/Message.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/Meteor/Message.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 11 by knops.gerd, Thu Dec 14 16:29:42 2006 UTC revision 25 by knops.gerd, Sun May 20 19:40:53 2007 UTC
# Line 62  sub newWithID { Line 62  sub newWithID {
62          $self->{'id'}=$id;          $self->{'id'}=$id;
63          $self->{'text'}=$text;          $self->{'text'}=$text;
64                    
65            $::Statistics->{'unique_messages'}++;
66            
67          &::syslog('debug',"New message $id");          &::syslog('debug',"New message $id");
68                    
69          $self;          $self;
# Line 77  sub setText { Line 79  sub setText {
79          $self->{'text'}=$text;          $self->{'text'}=$text;
80  }  }
81    
82    sub channelName {
83            shift->{'channel'};
84    }
85    
86    sub setChannelName {
87            my $self=shift;
88            my $channelName=shift || '';
89            
90            $self->{'channel'}=$channelName;
91    }
92    
93  sub text {  sub text {
94          shift->{'text'};          shift->{'text'};
95  }  }
Legend:
Removed from v.11  
changed lines
  Added in v.25
  ViewVC Help
Powered by ViewVC 1.1.26