[prev] [thread] [next] [lurker] [Date index for 2002/08/22]
Update of /cvsroot/siesta/siesta/lib/Siesta/Plugin In directory usw-pr-cvs1:/tmp/cvs-serv11349 Modified Files: Send.pm Log Message: check correct thing Index: Send.pm =================================================================== RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin/Send.pm,v retrieving revision 1.16 retrieving revision 1.17 diff -u -d -r1.16 -r1.17 --- Send.pm 22 Aug 2002 21:06:34 -0000 1.16 +++ Send.pm 22 Aug 2002 21:09:12 -0000 1.17 @@ -24,7 +24,7 @@ my $subject = $mail->head->get("Subject"); $mail->head->replace("Subject", "[$list_name] $subject") - unless /\[$list_name\]/; + unless $subject =~ /\[$list_name\]/; for my $user ($list->members) { my $address = $user->id;
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52