| CC: | DJKERNEN [...] cpan.org |
| Subject: | Mail::IMAPClient 2.2.9 - Patch for PREAUTH support |
| Date: | Fri, 17 Feb 2006 03:55:30 -0800 |
| To: | bug-Mail-IMAPClient [...] rt.cpan.org |
| From: | Danny Siu <danny.siu [...] gmail.com> |
Hi,
IMAPClient would inf-loop in connet() if the IMAP server supports
PREAUTH (like Dovecot). The following patch fixes the problem.
diff IMAPClient.pm IMAPClient.pm.orig
280c280
< ($code) = $o->[DATA] =~ /^\*\s+(OK|BAD|NO|PREAUTH)/i ;
---
Show quoted text
> ($code) = $o->[DATA] =~ /^\*\s+(OK|BAD|NO)/i ;
290,295d289
< # preauthenticated
< if ($code =~ /PREAUTH/ ) {
< $self->State(Authenticated);
< return $self;
< }
<
--
Danny Siu