Mercurial > hg > chronicle
changeset 244:aaff32519e78
Perltidied
author | Steve Kemp <steve@steve.org.uk> |
---|---|
date | Fri, 16 May 2008 17:41:26 +0100 |
parents | 855f04717521 |
children | f4946f262f96 |
files | cgi-bin/comments.cgi |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
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";