(modb-standard-message-entity): Avoid infinite

[elisp/wanderlust.git] / elmo / modb-standard.el

diff --git a/elmo/modb-standard.el b/elmo/modb-standard.el
index 04487fd..4d69c83 100644 (file)
--- a/elmo/modb-standard.el
+++ b/elmo/modb-standard.el
@@ -482,8 +482,8 @@
   (let ((ret (elmo-get-hash-val
              key
              (modb-standard-entity-map-internal msgdb))))
-    (if (and (eq 'autoload (car-safe ret)) load)
-       (when modb-standard-divide-number
+    (if (eq 'autoload (car-safe ret))
+       (when (and load modb-standard-divide-number)
          (modb-standard-load-entity
           msgdb
           (elmo-msgdb-location msgdb)