From bbf4ed11de0e6b7543a60766e15f392e9c487663 Mon Sep 17 00:00:00 2001 From: hmurata Date: Mon, 24 May 2004 11:39:54 +0000 Subject: [PATCH] (modb-standard-message-entity): Avoid infinite recursive call. --- elmo/ChangeLog | 5 +++++ elmo/modb-standard.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 9c23503..633f1c4 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2004-05-24 Hiroya Murata + + * modb-standard.el (modb-standard-message-entity): Avoid infinite + recursive call. + 2004-05-23 Hiroya Murata * elmo-spam.el (elmo-spam-register-good-messages): Don't call diff --git a/elmo/modb-standard.el b/elmo/modb-standard.el index 04487fd..4d69c83 100644 --- 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) -- 1.7.10.4