projects
/
elisp
/
wanderlust.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* wl-vars.el (wl-folder-sync-range-alist): Set default range for
[elisp/wanderlust.git]
/
elmo
/
elmo-vars.el
diff --git
a/elmo/elmo-vars.el
b/elmo/elmo-vars.el
index
36d70d1
..
e2de650
100644
(file)
--- a/
elmo/elmo-vars.el
+++ b/
elmo/elmo-vars.el
@@
-59,6
+59,13
@@
;; Message Database
;; Message Database
+(defcustom elmo-msgdb-default-type 'legacy
+ "*Default type of Message Database for ELMO."
+ :type '(radio (const legacy)
+ (const :tag "No use" generic))
+ :group 'elmo
+ :group 'elmo-setting)
+
(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.")
@@
-88,12
+95,6
@@
;;; IMAP4
;;; IMAP4
-(defcustom elmo-imap4-default-mailbox "inbox"
- "*Default IMAP4 mailbox."
- :type 'string
- :group 'elmo
- :group 'elmo-setting)
-
(defcustom elmo-imap4-default-server "localhost"
"*Default IMAP4 server."
:type 'string
(defcustom elmo-imap4-default-server "localhost"
"*Default IMAP4 server."
:type 'string
@@
-239,8
+240,6
@@
This is taken precedence over `elmo-network-stream-type-alist'.")
(defvar elmo-msgdb-lock-list-filename "lock"
"Locked messages...list of message-id.
For disconnected operations.")
(defvar elmo-msgdb-lock-list-filename "lock"
"Locked messages...list of message-id.
For disconnected operations.")
-(defvar elmo-msgdb-global-mark-filename "global-mark"
- "Alist of global mark.")
(defvar elmo-lost+found-folder "+lost+found"
"Lost and found.")
(defvar elmo-crosspost-alist-filename "crosspost-alist"
(defvar elmo-lost+found-folder "+lost+found"
"Lost and found.")
(defvar elmo-crosspost-alist-filename "crosspost-alist"