projects
/
elisp
/
wanderlust.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* wl-acap.el (wl-acap-original-msgdb-directory): Renamed from
[elisp/wanderlust.git]
/
elmo
/
elmo-vars.el
diff --git
a/elmo/elmo-vars.el
b/elmo/elmo-vars.el
index
d501215
..
9400912
100644
(file)
--- 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-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.")
"*ELMO Message Database path.")
(defvar elmo-passwd-alist-file-name "passwd"
"*ELMO Password filename.")
@@
-291,7
+291,7
@@
If function, return value of function.")
;; static/dl-database
(fboundp 'open-database)))
;; static/dl-database
(fboundp 'open-database)))
-(defvar elmo-date-match (not (boundp 'nemacs-version))
+(defvar elmo-date-match t
"Date match is available or not.")
(defvar elmo-network-stream-type-alist
"Date match is available or not.")
(defvar elmo-network-stream-type-alist
@@
-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-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
"Directory name for cache storage.")
(defvar elmo-pack-number-check-strict t