* wl.el (wl): Changed order of calling `elmo-init' and `elmo-folder-init'.

* elmo.el (elmo-quit): Call `elmo-dop-queue-save'.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index aec5371..714ae99 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2001-09-14  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * elmo.el (elmo-quit): Call `elmo-dop-queue-save'.
+
 2001-09-14  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * acap.el (acap-read-passphrase): Always autoload ange-ftp for

diff --git a/elmo/elmo.el b/elmo/elmo.el
index 48d597f..0dbcf75 100644 (file)
--- 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 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-14  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * wl.el (wl): Changed order of calling `elmo-init'
+       and `elmo-folder-init'.
+
 2001-09-13  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * 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 (file)
--- 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)))