* elmo.el (elmo-generic-folder-append-messages): Set flag as nil

[elisp/wanderlust.git] / elmo / elmo.el

diff --git a/elmo/elmo.el b/elmo/elmo.el
index 752717d..f3396fa 100644 (file)
--- a/elmo/elmo.el
+++ b/elmo/elmo.el
@@ -1014,6 +1014,7 @@ Return a cons cell of (NUMBER-CROSSPOSTS . NEW-MARK-ALIST).")
        (setq failure nil
              mark (elmo-message-mark src-folder (car numbers))
              flag (cond
+                   ((null mark) nil)
                    ((member mark (elmo-msgdb-answered-marks))
                     'answered)
                    ;;