/[meteor]/googlecode.com/svn/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 /googlecode.com/svn/trunk/Meteor/Message.pm

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

revision 16 by knops.gerd, Tue May 1 16:59:28 2007 UTC revision 45 by knops.gerd, Mon Feb 4 19:02:49 2008 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 101  sub timestamp { Line 103  sub timestamp {
103  }  }
104    
105  sub message {  sub message {
         my $self=shift;  
106                    
107          my $msg=$::CONF{'MessageTemplate'};          shift->messageWithTemplate($::CONF{'MessageTemplate'});
108    }
109    
110    sub messageWithTemplate {
111            my $self=shift;
112            my $msg=shift;
113                    
114          $msg=~s/~([^~]*)~/          $msg=~s/~([^~]*)~/
115                  if(!defined($1) || $1 eq '')                  if(!defined($1) || $1 eq '')

Legend:
Removed from v.16  
changed lines
  Added in v.45

  ViewVC Help
Powered by ViewVC 1.1.26