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";