* elmo.el (elmo-folder-list-unreads): Don't use msgdb API.

[elisp/wanderlust.git] / elmo / elmo-vars.el

diff --git a/elmo/elmo-vars.el b/elmo/elmo-vars.el
index 2a6e0ae..39601f5 100644 (file)
--- a/elmo/elmo-vars.el
+++ b/elmo/elmo-vars.el
@@ -35,6 +35,16 @@
   (defun-maybe dynamic-link (a))
   (defun-maybe dynamic-call (a b)))
 
+;; bind colon keywords for old Emacsen.
+(dont-compile
+  (condition-case nil
+      :symbol-for-testing-whether-colon-keyword-is-available-or-not
+    (void-variable
+     (let ((kwds '(:cc :date :extra :message-id :number :references :subject)))
+       (while kwds
+        (set (car kwds) (car kwds))
+        (setq kwds (cdr kwds)))))))
+
 (defgroup elmo nil
   "ELMO, Elisp Library for Message Orchestration."
   :tag "ELMO"
@@ -78,12 +88,6 @@
 
 ;;; 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
@@ -377,9 +381,6 @@ Arguments for this function are NAME, BUFFER, HOST and SERVICE.")
 (defvar elmo-use-decoded-cache (featurep 'xemacs)
   "Use cache of decoded mime charset string.")
 
-(defvar elmo-use-overview-hashtb t
-  "Use hash table of overview.")
-
 (defvar elmo-display-progress-threshold 20
   "*Displaying progress gauge if number of messages are more than this value.")