X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=utils%2Fwl-addrbook.el;h=d9fd2dd4b2988cc5d6b48eb3b501b98374acf014;hb=fb40159a1fc3d4fb1400f8fe3befb1056bc75b8c;hp=a650467304ec8714a58b65c43f5b0588b219151f;hpb=8b5f252276cfcb769e3ba669677630f3f4072f0c;p=elisp%2Fwanderlust.git

diff --git a/utils/wl-addrbook.el b/utils/wl-addrbook.el
index a650467..d9fd2dd 100644
--- a/utils/wl-addrbook.el
+++ b/utils/wl-addrbook.el
@@ -151,7 +151,7 @@ If nil,  the old 'user' entry remains.")
 	  (setq wl-alias-auto-alist
 		(elmo-object-load (expand-file-name
 				   wl-alias-auto-file-name
-				   elmo-msgdb-dir)))))
+				   elmo-msgdb-directory)))))
   (setq wl-addrbook-alist (wl-addrbook-make-alist))
   ;; wl-alias-auto-alist is used independently so must use copy-alist
   (if wl-addrbook-alist
@@ -164,7 +164,7 @@ If nil,  the old 'user' entry remains.")
   (wl-addrbook-make-hashtb)
   (add-hook 'kill-emacs-hook (function wl-addrbook-clean-up))
   (add-hook 'wl-exit-hook (function wl-addrbook-clean-up))
-  (message "Updating addrbook...done."))
+  (message "Updating addrbook...done"))
 
 (defun wl-addrbook-clean-up ()
   (remove-hook 'kill-emacs-hook (function wl-addrbook-clean-up))
@@ -172,7 +172,7 @@ If nil,  the old 'user' entry remains.")
   (when wl-alias-auto-file-name
     (elmo-object-save (expand-file-name
 		       wl-alias-auto-file-name
-		       elmo-msgdb-dir)
+		       elmo-msgdb-directory)
 		      wl-alias-auto-alist)
     (setq wl-alias-auto-alist nil)
     (setq wl-addrbook-hashtb nil)))