X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=elmo%2Felmo-vars.el;h=9400912b6088df9c8f3e86934ca6941ee36f6496;hb=9e39553b80115a949a7f04ddced4459a7797f8bd;hp=5ed767fd4406787f045e3fb34703c2908c1cbc1f;hpb=a36cd1f2bbcfbb74e7d369bc5645246cde4f227a;p=elisp%2Fwanderlust.git

diff --git a/elmo/elmo-vars.el b/elmo/elmo-vars.el
index 5ed767f..9400912 100644
--- a/elmo/elmo-vars.el
+++ b/elmo/elmo-vars.el
@@ -59,7 +59,7 @@ Each elements are regexp of folder name (This is obsolete).")
 (defvar elmo-msgdb-file-header-chop-length 2048
   "*Number of bytes to get header in one reading from file.")
 
-(defvar elmo-msgdb-dir "~/.elmo"
+(defvar elmo-msgdb-directory "~/.elmo"
   "*ELMO Message Database path.")
 (defvar elmo-passwd-alist-file-name "passwd"
   "*ELMO Password filename.")
@@ -321,7 +321,7 @@ Arguments for this function are NAME, BUFFER, HOST and SERVICE.")
 (defvar elmo-cache-expire-default-age 50
   "Cache expiration age (days).")
 
-(defvar elmo-cache-dirname "cache"
+(defvar elmo-cache-directory (expand-file-name "cache" elmo-msgdb-directory)
   "Directory name for cache storage.")
 
 (defvar elmo-pack-number-check-strict t