* elmo-maildir.el (elmo-maildir-max-of-folder): Call

[elisp/wanderlust.git] / elmo / elmo-maildir.el

diff --git a/elmo/elmo-maildir.el b/elmo/elmo-maildir.el
index 311318d..7eb1c66 100644 (file)
--- a/elmo/elmo-maildir.el
+++ b/elmo/elmo-maildir.el
@@ -375,6 +375,7 @@ file name for maildir directories."
   (elmo-maildir-list-folder-subr spec))
 
 (defun elmo-maildir-max-of-folder (spec)
+  (elmo-maildir-update-current spec)
   (elmo-maildir-list-folder-subr spec t))
 
 (defalias 'elmo-maildir-check-validity 'elmo-localdir-check-validity)