From c20536b054d3430d37da31ecac9d14b39a29397e Mon Sep 17 00:00:00 2001
From: Dianne Skoll <dianne@skoll.ca>
Date: Wed, 12 Jan 2022 14:34:40 -0500
Subject: [PATCH] Fix really stupid typo.

---
 perl/lib/Mailmunge/Test/Rspamd.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/perl/lib/Mailmunge/Test/Rspamd.pm b/perl/lib/Mailmunge/Test/Rspamd.pm
index 86fbebd..6785ee4 100644
--- a/perl/lib/Mailmunge/Test/Rspamd.pm
+++ b/perl/lib/Mailmunge/Test/Rspamd.pm
@@ -47,7 +47,9 @@ sub _rspamd_check_aux
 {
         my ($self, $ctx, $sock) = @_;
 
-        if (!open(IN, '<', $self->inputmsg())) {
+        my $in_fh = $self->filter->inputmsg_fh();
+
+        if (!$in_fh) {
                 return Mailmunge::Response->TEMPFAIL(message => 'Unable to open message file');
         }
 
@@ -55,14 +57,12 @@ sub _rspamd_check_aux
 
         # Send the request
         $sock->print($headers);
-        print STDERR "Sent $headers\n";
         $sock->print("\r\n");
         my $buf;
-        while(read(IN, $buf, 4096)) {
-                print STDERR "Sent $buf\n";
+        while(read($in_fh, $buf, 4096)) {
                 $sock->print($buf);
         }
-        close(IN);
+        close($in_fh);
         $sock->flush();
 
         # Read the results