(elmo-folder-append-buffer): change name of argument flag -> flags

diff --git a/elmo/elmo-cache.el b/elmo/elmo-cache.el
index c09a95f..7ea9ae7 100644 (file)
--- a/elmo/elmo-cache.el
+++ b/elmo/elmo-cache.el
@@ -113,7 +113,7 @@
     new-msgdb))
 
 (luna-define-method elmo-folder-append-buffer ((folder elmo-cache-folder)
-                                              &optional flag number)
+                                              &optional flags number)
   ;; dir-name is changed according to msgid.
   (unless (elmo-cache-folder-dir-name-internal folder)
     (let ((msgid (std11-field-body "message-id"))

diff --git a/elmo/elmo-localdir.el b/elmo/elmo-localdir.el
index 6eae055..fff92e8 100644 (file)
--- a/elmo/elmo-localdir.el
+++ b/elmo/elmo-localdir.el
@@ -197,7 +197,7 @@
       (sort flist '<))))
 
 (luna-define-method elmo-folder-append-buffer ((folder elmo-localdir-folder)
-                                              &optional flag number)
+                                              &optional flags number)
   (let ((filename (elmo-message-file-name
                   folder
                   (or number
@@ -210,7 +210,7 @@
             (table (elmo-flag-table-load path))
             (msgid (std11-field-body "message-id")))
        (when msgid
-         (elmo-flag-table-set table msgid flag)
+         (elmo-flag-table-set table msgid flags)
          (elmo-flag-table-save path table)))
       t)))
 

diff --git a/elmo/elmo.el b/elmo/elmo.el
index 717a850..0dcfae0 100644 (file)
--- a/elmo/elmo.el
+++ b/elmo/elmo.el
@@ -372,11 +372,11 @@ If optional IS-LOCAL is non-nil, update only local (not server) status.")
   "The next message number that will be assigned to a new message.
 FOLDER is the ELMO folder structure.")
 
-(luna-define-generic elmo-folder-append-buffer (folder &optional flag
+(luna-define-generic elmo-folder-append-buffer (folder &optional flags
                                                       number)
   "Append current buffer as a new message.
 FOLDER is the destination folder(ELMO folder structure).
-FLAG is the status of appended message.
+FLAGS is the status of appended message (list of symbols).
 If optional argument NUMBER is specified, the new message number is set
 \(if possible\).
 Return nil on failure.")