[prev] [thread] [next] [lurker] [Date index for 2002/09/14]
Update of /cvsroot/siesta/siesta/lib/Siesta In directory usw-pr-cvs1:/tmp/cvs-serv21176/lib/Siesta Modified Files: Message.pm Log Message: Fix conflict stuff. Index: Message.pm =================================================================== RCS file: /cvsroot/siesta/siesta/lib/Siesta/Message.pm,v retrieving revision 1.19 retrieving revision 1.20 diff -u -d -r1.19 -r1.20 --- Message.pm 14 Sep 2002 09:19:57 -0000 1.19 +++ Message.pm 14 Sep 2002 09:46:35 -0000 1.20 @@ -43,6 +43,10 @@ $self->body(@body); } + my $to = $args{'to'} || $self->from(); + my $from = $args{'from'} || $self->to(); + + $self->to($to); $self->from($from); @@ -58,7 +62,7 @@ my $self = shift; my %args = @_; - my $to = $args{'from'} || $self->from(); + my $to = $args{'to'} || $self->from(); $self->send( to => $to ); }
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52