diff options
author | Eric Wong <e@80x24.org> | 2021-09-15 21:19:43 -0500 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-09-16 04:29:18 +0000 |
commit | 9d65d8e41fa69c0f0a13789754c5d6dc5f699b8a (patch) | |
tree | c53eed7d9063fc5419459da128bba0eeb4728542 /lib/PublicInbox/IMAP.pm | |
parent | ddfa726e55411277c5f8fda6a5f2c82d062b3fe2 (diff) | |
download | public-inbox-9d65d8e41fa69c0f0a13789754c5d6dc5f699b8a.tar.gz |
While RFC 3501 doesn't require LIST responses be sorted, it makes reading protocol dumps easier and we memoize it once per-refresh, so it shouldn't be too expensive even with thousands of folders.
Diffstat (limited to 'lib/PublicInbox/IMAP.pm')
-rw-r--r-- | lib/PublicInbox/IMAP.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/PublicInbox/IMAP.pm b/lib/PublicInbox/IMAP.pm index 37e07dae..27013ea5 100644 --- a/lib/PublicInbox/IMAP.pm +++ b/lib/PublicInbox/IMAP.pm @@ -384,7 +384,7 @@ sub ensure_slices_exist ($$$) { push @created, $sub_mailbox; } return unless @created; - my $l = $imapd->{inboxlist} or return; + my $l = $imapd->{mailboxlist} or return; push @$l, map { qq[* LIST (\\HasNoChildren) "." $_\r\n] } @created; } @@ -850,7 +850,7 @@ sub cmd_status ($$$;@) { my %patmap = ('*' => '.*', '%' => '[^\.]*'); sub cmd_list ($$$$) { my ($self, $tag, $refname, $wildcard) = @_; - my $l = $self->{imapd}->{inboxlist}; + my $l = $self->{imapd}->{mailboxlist}; if ($refname eq '' && $wildcard eq '') { # request for hierarchy delimiter $l = [ qq[* LIST (\\Noselect) "." ""\r\n] ]; |