imap: support the CLOSE command

It seems worthless to support CLOSE for read-only inboxes, but
mutt sends it, so don't return a BAD error with proper use.

1 files changed, 6 insertions, 0 deletions

diff --git a/lib/PublicInbox/IMAP.pm b/lib/PublicInbox/IMAP.pm
index 54c616ee..0852ffab 100644
--- a/lib/PublicInbox/IMAP.pm
+++ b/lib/PublicInbox/IMAP.pm
@@ -121,6 +121,12 @@ sub cmd_login ($$$$) {
         login_success($self, $tag);
 }
 
+sub cmd_close ($$) {
+        my ($self, $tag) = @_;
+        delete $self->{ibx} ? "$tag OK Close done\r\n"
+                                : "$tag BAD No mailbox\r\n";
+}
+
 sub cmd_logout ($$) {
         my ($self, $tag) = @_;
         delete $self->{logged_in};