Bug in Mail::Transport::IMAP4

--=-nlA+SGEODfvgal/IWegZ
Content-Type: text/plain
Content-Transfer-Encoding: 7bit

When I try to log into my dovecot imap server, I get:

Can't use string ("PLAIN") as an ARRAY ref while "strict refs" in use
at /usr/local/share/perl/5.8.7/Mail/Transport/IMAP4.pm line 97.

I've included a patch that appears to fix it.  Any chance of getting
this applied?

Thanks,

    - Scott


--=-nlA+SGEODfvgal/IWegZ
Content-Disposition: attachment; filename=fix.patch
Content-Type: text/x-patch; name=fix.patch; charset=UTF-8
Content-Transfer-Encoding: 7bit

--- /tmp/IMAP4.pm	2006-05-17 23:02:09.000000000 -0400
+++ /usr/local/share/perl/5.8.7/Mail/Transport/IMAP4.pm	2006-05-17 23:01:34.000000000 -0400
@@ -89,7 +89,7 @@
     # What does the server support? in its order of preference.
 
     my $imap = $self->imapClient or return ();
-    my @serverside = map { m/^AUTH=(\w+)/ ? uc($1) : () }
+    my @serverside = map { m/^AUTH=(\w+)/ ? [uc($1) => undef] : () }
                         $imap->capability;
 
     my @auth;

--=-nlA+SGEODfvgal/IWegZ--