X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=elmo%2Felmo-archive.el;h=dce24bcc99dedbd84a2323996d966644d04101c6;hb=10518221da70c6e7ffc66352ee6a3e1036bd5133;hp=478eabb92ab69a6740e1851367a52a4850e9442c;hpb=08e424ca82c351c0d93f4b5e9f9c747bb0cb83d7;p=elisp%2Fwanderlust.git

diff --git a/elmo/elmo-archive.el b/elmo/elmo-archive.el
index 478eabb..dce24bc 100644
--- a/elmo/elmo-archive.el
+++ b/elmo/elmo-archive.el
@@ -460,7 +460,7 @@ TYPE specifies the archiver's symbol."
 ;;; Article file related functions
 ;;; read(extract) / append(move) / delete(delete) / query(list)
 
-(defun elmo-archive-read-msg (spec number outbuf)
+(defun elmo-archive-read-msg (spec number outbuf &optional msgdb unread)
   (save-excursion
     (let* ((type (nth 2 spec))
 	   (arc (elmo-archive-get-archive-name (nth 1 spec) type spec))