From 0196c0ffe06fb1d9a4f9142238480dafd425bbe4 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Sat, 29 Mar 2008 19:54:25 -0700
Subject: [PATCH] fix defined tests in spamscan-sa

---
 scripts/spamscan.in | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/scripts/spamscan.in b/scripts/spamscan.in
index d1acbe1d..5c79c30d 100755
--- a/scripts/spamscan.in
+++ b/scripts/spamscan.in
@@ -134,14 +134,14 @@ getid:	    for (;;) {
 	    }
 	    print $sain "$id\n$nf\n";
 	    lprint "{$mytid} $id is $nf\n";
-	    my $keys;
-	    unless (defined($keys = <$saout>)) {
+	    my $keys = <$saout>
+	    unless (defined $keys) {
 		lprint "{$mytid} Could not get keys: $!\n";
 		last pp;
 	    }
 	    chomp $keys;
-	    my $messageid;
-	    unless (defined($messageid = <$saout>)) {
+	    my $messageid = <$saout>
+	    unless (defined($messageid)) {
 		lprint "{$mytid} Could not read messageid: $!\n";
 		last pp;
 	    }
@@ -180,8 +180,8 @@ crossret:   for (;;) {
 		lprint "{$mytid} Could not send ca_score: $!\n";
 		last pp;
 	    }
-	    my $todo;
-	    unless (defined($todo = <$saout>)) {
+	    my $todo = <$saout>;
+	    unless (defined($todo)) {
 		lprint "{$mytid} Could not read todo: $!\n";
 		last pp;
 	    }
@@ -199,7 +199,7 @@ crossret:   for (;;) {
 		print $sain "$todo\n";
 		$nseen = <$saout>;
 	    }
-	    unless($nseen) {
+	    unless(defined($nseen)) {
 		lprint "{$mytid} Could not read seen: $!\n";
 		start_sa() if (scalar(@ids) > ($threadsrunning * $config{spam_spams_per_thread})
 		    && $threadsrunning < $config{spam_max_threads});
@@ -207,8 +207,8 @@ crossret:   for (;;) {
 	    }
 	    chomp $nseen;
 	    $spamseen{$messageid} = $nseen if ($nseen);
-	    my $out;
-	    unless(defined($out = <$saout>)) {
+	    my $out = <$saout>;
+	    unless(defined($out)) {
 		lprint "{$mytid} Could not read out: $!\n";
 		last pp;
 	    }
-- 
2.39.5