From 03f02402ff8cb75eef3c727ceba8f2c28fdec551 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem@fripost.org>
Date: Wed, 9 May 2018 01:49:37 +0200
Subject: typofix

---
 lib/Net/IMAP/InterIMAP.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Net/IMAP/InterIMAP.pm b/lib/Net/IMAP/InterIMAP.pm
index d898f6d..3270108 100644
--- a/lib/Net/IMAP/InterIMAP.pm
+++ b/lib/Net/IMAP/InterIMAP.pm
@@ -963,7 +963,7 @@ sub slurp($$$) {
         foreach my $imap (@ready) {
             my $x = $imap->_getline();
             $imap->_resp($x, sub($;$$) {
-                if ($stopwhen->(@_)) {
+                if ($stopwhen->($imap, @_)) {
                     $aborted = 1;
                     $timeout = 0; # keep reading the handles while there is pending data
                 }
-- 
cgit v1.2.3