[siesta-commit] siesta/lib/Siesta/Plugin Send.pm,1.26,1.27

[prev] [thread] [next] [lurker] [Date index for 2002/09/15]

From: clampr
Subject: [siesta-commit] siesta/lib/Siesta/Plugin Send.pm,1.26,1.27
Date: 16:47 on 15 Sep 2002
Update of /cvsroot/siesta/siesta/lib/Siesta/Plugin
In directory usw-pr-cvs1:/tmp/cvs-serv19444/lib/Siesta/Plugin

Modified Files:
	Send.pm 
Log Message:
fix the Send plugin so that it doesn't munge

Let the ->send api take an array of email addresses (makes handing off 
to Sendmail more efficient)


Index: Send.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin/Send.pm,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -d -r1.26 -r1.27
--- Send.pm	15 Sep 2002 11:34:06 -0000	1.26
+++ Send.pm	15 Sep 2002 15:47:23 -0000	1.27
@@ -12,12 +12,9 @@
     my $mail = shift;
 
     my $list = $mail->list;
-    for my $user ( $list->members ) {
-        $mail->user($user);
-        $mail->from( $list->post_address() );
-        $mail->to( $user->id );
-        Siesta->sender->process($mail);
-    }
+    Siesta->sender->send($mail,
+                         to   => [ map { $_->id } $list->members ],
+                         from => $list->return_path);
     return;
 }
 



Generated at 13:57 on 01 Jul 2004 by mariachi 0.52