From d6f0f1d102813e2bf503ab8f524363dbd501ede4 Mon Sep 17 00:00:00 2001
From: yoichi <yoichi>
Date: Sat, 10 Apr 2004 17:50:30 +0000
Subject: [PATCH] (elmo-folder-append-buffer): change name of argument flag ->
 flags

---
 elmo/elmo-cache.el    |    2 +-
 elmo/elmo-localdir.el |    4 ++--
 elmo/elmo.el          |    4 ++--
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/elmo/elmo-cache.el b/elmo/elmo-cache.el
index c09a95f..7ea9ae7 100644
--- 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
--- 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
--- 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.")
-- 
1.7.10.4