projects
/
elisp
/
wanderlust.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* elmo.el (elmo-message-flags): Add optional argument `msgid'.
[elisp/wanderlust.git]
/
elmo
/
elmo-multi.el
diff --git
a/elmo/elmo-multi.el
b/elmo/elmo-multi.el
index
7ef950f
..
c9d1368
100644
(file)
--- a/
elmo/elmo-multi.el
+++ b/
elmo/elmo-multi.el
@@
-181,9
+181,10
@@
(let ((pair (elmo-multi-real-folder-number folder number)))
(elmo-message-field (car pair) (cdr pair) field)))
(let ((pair (elmo-multi-real-folder-number folder number)))
(elmo-message-field (car pair) (cdr pair) field)))
-(luna-define-method elmo-message-flags ((folder elmo-multi-folder) number)
+(luna-define-method elmo-message-flags ((folder elmo-multi-folder) number
+ &optional msgid)
(let ((pair (elmo-multi-real-folder-number folder number)))
(let ((pair (elmo-multi-real-folder-number folder number)))
- (elmo-message-flags (car pair) (cdr pair))))
+ (elmo-message-flags (car pair) (cdr pair) msgid)))
(defun elmo-multi-split-numbers (folder numlist &optional as-is)
(let ((numbers (sort numlist '<))
(defun elmo-multi-split-numbers (folder numlist &optional as-is)
(let ((numbers (sort numlist '<))