From 03f02402ff8cb75eef3c727ceba8f2c28fdec551 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Wed, 9 May 2018 01:49:37 +0200 Subject: typofix --- lib/Net/IMAP/InterIMAP.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Net/IMAP') 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