Mercurial > hg > chronicle
diff cgi-bin/comments.cgi @ 244:aaff32519e78
Perltidied
| author | Steve Kemp <steve@steve.org.uk> |
|---|---|
| date | Fri, 16 May 2008 17:41:26 +0100 |
| parents | e1d0a8576342 |
| children | 9c05c34e7e8f d2ab0ff77660 |
line wrap: on
line diff
--- a/cgi-bin/comments.cgi Fri May 16 17:40:55 2008 +0100 +++ b/cgi-bin/comments.cgi Fri May 16 17:41:26 2008 +0100 @@ -54,7 +54,7 @@ # Find sendmail # my $SENDMAIL = undef; -foreach my $file ( qw ! /usr/lib/sendmail /usr/sbin/sendmail ! ) +foreach my $file (qw ! /usr/lib/sendmail /usr/sbin/sendmail !) { $SENDMAIL = $file if ( -x $file ); } @@ -162,7 +162,7 @@ # # Send a mail. # -if ( length($TO) && length($FROM) && defined( $SENDMAIL ) ) +if ( length($TO) && length($FROM) && defined($SENDMAIL) ) { open( SENDMAIL, "|$SENDMAIL -t -f $FROM" ); print SENDMAIL "To: $TO\n";