[siesta-commit] siesta/lib Siesta.pm,1.19,1.20

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

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

Modified Files:
	Siesta.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: Siesta.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta.pm,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -d -r1.19 -r1.20
--- Siesta.pm	12 Sep 2002 15:28:15 -0000	1.19
+++ Siesta.pm	15 Sep 2002 15:47:23 -0000	1.20
@@ -79,7 +79,7 @@
 
 my $sender;
 
-=item ->sender 
+=item ->sender
 
 Return the current sender.
 
@@ -90,12 +90,7 @@
 =cut
 
 sub sender {
-
-    unless ( defined $sender ) {
-        Siesta->set_sender('Sendmail');
-    }
-
-    return $sender;
+    $sender || Siesta->set_sender('Sendmail');
 }
 
 =item ->set_sender ($class, @options)
@@ -115,7 +110,6 @@
     eval "require $class";
     die $@ if $@;
     $sender = $class->new(@_);
-
 }
 
 =item ->list_all_plugins



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