From 28ce28a1116e7b3f9f361c62f37f1c63d39a07d6 Mon Sep 17 00:00:00 2001 From: teranisi Date: Fri, 14 Sep 2001 04:38:18 +0000 Subject: [PATCH] * wl.el (wl): Changed order of calling `elmo-init' and `elmo-folder-init'. * elmo.el (elmo-quit): Call `elmo-dop-queue-save'. --- elmo/ChangeLog | 4 ++++ elmo/elmo.el | 2 +- wl/ChangeLog | 5 +++++ wl/wl.el | 4 ++-- 4 files changed, 12 insertions(+), 3 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index aec5371..714ae99 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,7 @@ +2001-09-14 Yuuichi Teranishi + + * elmo.el (elmo-quit): Call `elmo-dop-queue-save'. + 2001-09-14 Katsumi Yamaoka * acap.el (acap-read-passphrase): Always autoload ange-ftp for diff --git a/elmo/elmo.el b/elmo/elmo.el index 48d597f..0dbcf75 100644 --- a/elmo/elmo.el +++ b/elmo/elmo.el @@ -1397,8 +1397,8 @@ Return a hashtable for newsgroups." (defun elmo-quit () "Quit and cleanup ELMO." -; (setq elmo-newsgroups-hashtb nil) (elmo-crosspost-message-alist-save) + (elmo-dop-queue-save) ;; Not implemented yet. (let ((types elmo-folder-type-alist) class) diff --git a/wl/ChangeLog b/wl/ChangeLog index fe585db..5be8e21 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2001-09-14 Yuuichi Teranishi + + * wl.el (wl): Changed order of calling `elmo-init' + and `elmo-folder-init'. + 2001-09-13 Hiroya Murata * wl-mime.el (wl-summary-burst): Extract message when content-type diff --git a/wl/wl.el b/wl/wl.el index 9b7bdeb..192160d 100644 --- a/wl/wl.el +++ b/wl/wl.el @@ -755,8 +755,8 @@ If ARG (prefix argument) is specified, folder checkings are skipped." (interactive "P") (unless wl-init (wl-load-profile) - (elmo-init) - (wl-folder-init)) + (wl-folder-init) + (elmo-init)) (let (demo-buf check) (unless wl-init (if wl-demo (setq demo-buf (wl-demo))) -- 1.7.10.4