From 8892b861bf7f716d1610e2446d10fcf95ddc43c8 Mon Sep 17 00:00:00 2001 From: yoichi Date: Sun, 26 Sep 2004 14:15:06 +0000 Subject: [PATCH] * elmo-imap4.el (elmo-folder-delete): Clear current-mailbox after deletion. --- elmo/ChangeLog | 5 +++++ elmo/elmo-imap4.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 74f0f18..2ffde2e 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2004-09-26 Yoichi NAKAYAMA + + * elmo-imap4.el (elmo-folder-delete): Clear current-mailbox after + deletion. + 2004-09-24 Yuuichi Teranishi * elmo-mime.el (elmo-mime-display-as-is-internal): Insert decoded diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el index 4bfcebe..6c60bb4 100644 --- a/elmo/elmo-imap4.el +++ b/elmo/elmo-imap4.el @@ -2085,7 +2085,8 @@ Return nil if no complete line has arrived." session (list "delete " (elmo-imap4-mailbox - (elmo-imap4-folder-mailbox-internal folder)))))) + (elmo-imap4-folder-mailbox-internal folder))))) + (elmo-imap4-session-set-current-mailbox-internal session nil)) (elmo-msgdb-delete-path folder) t))) -- 1.7.10.4