X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=elmo%2Felmo-imap4.el;h=022048ec89784754cac797b677d4474899a05b1e;hb=10518221da70c6e7ffc66352ee6a3e1036bd5133;hp=04c98ffb2f993c4d31eeec673acf2e4061c3d1d2;hpb=00990dd383e2e34706cd032fa256b90459091d8f;p=elisp%2Fwanderlust.git

diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 04c98ff..022048e 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -1359,7 +1359,7 @@ If optional argument UNMARK is non-nil, unmark."
   (elmo-imap4-read-msg spec msg outbuf 'unseen))
 
 (defun elmo-imap4-read-msg (spec msg outbuf
-				 &optional leave-seen-flag-untouched)
+				 &optional msgdb leave-seen-flag-untouched)
   (let ((session (elmo-imap4-get-session spec))
 	response)
     (elmo-imap4-session-select-mailbox session