[siesta-commit] siesta/lib/Siesta/Send Sendmail.pm,1.7,1.8

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

Update of /cvsroot/siesta/siesta/lib/Siesta/Send
In directory usw-pr-cvs1:/tmp/cvs-serv24581

Modified Files:
	Sendmail.pm 
Log Message:
fix Evil^Wpathological case


Index: Sendmail.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Send/Sendmail.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- Sendmail.pm	17 Sep 2002 11:31:55 -0000	1.7
+++ Sendmail.pm	18 Sep 2002 14:22:07 -0000	1.8
@@ -22,6 +22,7 @@
     my $from = $args{'from'} || $message->from();
     my $to   = $args{'to'} || $message->to();
     my @to   = ref $to eq 'ARRAY' ? @$to : $to;
+    return 1 unless @to; # guard against no recipients
 
     local *SENDMAIL;
     open SENDMAIL, "|/usr/sbin/sendmail -oi -f $from " . join ( ' ', @to )

• [siesta-commit] siesta/lib/Siesta/Send Sendmail.pm,1.7,1.8 clampr 15:22 on 18 Sep 2002

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