* modb-standard.el (modb-standard-loaded-message-id): Return nil

when entity is garbaged.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 111347f..d394fba 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2004-09-13  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * modb-standard.el (modb-standard-loaded-message-id): Return nil
+       when entity is garbaged.
+
 2004-09-13  Tetsurou Okazaki  <okazaki@be.to>
 
        * elmo-util.el (elmo-delete-if): Reduce loop strength in a while loop.

diff --git a/elmo/modb-standard.el b/elmo/modb-standard.el
index 53d7b2f..7e15c40 100644 (file)
--- a/elmo/modb-standard.el
+++ b/elmo/modb-standard.el
@@ -189,7 +189,8 @@ When non-nil, redundunt message-id string are not saved."
      ((null ret)
       ;; Garbage entity.
       (elmo-clear-hash-val (modb-standard-key number)
-                          (modb-standard-entity-map-internal msgdb)))
+                          (modb-standard-entity-map-internal msgdb))
+      nil)                             ; return nil.
      (t (error "Internal error: invalid msgdb status")))))
 
 (defun modb-standard-load-entity (modb path &optional section)