* elmo-vars.el (elmo-imap4-default-authenticate-type): Give

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

diff --git a/elmo/mmimap.el b/elmo/mmimap.el
index b8a167c..f0e33a2 100644 (file)
--- a/elmo/mmimap.el
+++ b/elmo/mmimap.el
@@ -61,6 +61,8 @@ SECTION is a section string which is defined in RFC2060.")
 (defun mmimap-entity-section (node-id)
   "Return a section string from NODE-ID"
   (cond
+   ((null node-id)
+    "1")
    ((numberp node-id)
     (number-to-string (1+ node-id)))
    ((listp node-id)