From 35b0de148d6bebca5aadd8dda40780680f9b98d6 Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 24 Mar 2003 05:36:55 +0000 Subject: [PATCH] Fixed last change. --- elmo/elmo-msgdb.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/elmo/elmo-msgdb.el b/elmo/elmo-msgdb.el index 2aa91cc..7fb5013 100644 --- a/elmo/elmo-msgdb.el +++ b/elmo/elmo-msgdb.el @@ -526,9 +526,13 @@ content of MSGDB is changed." (defun elmo-flag-table-save (dir flag-table) (elmo-object-save (expand-file-name elmo-flag-table-filename dir) - (mapatoms (lambda (atom) - (cons (symbol-name atom) (symbol-value atom))) - flag-table))) + (let (list) + (mapatoms (lambda (atom) + (setq list (cons (cons (symbol-name atom) + (symbol-value atom)) + list))) + flag-table) + list))) ;;; ;; persistent mark handling ;; (for each folder) -- 1.7.10.4