* elmo-localnews.el (elmo-localnews-folder-path): Moved from elmo-vars.el.

* elmo-maildir.el (elmo-maildir-folder-path): Ditto.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 7d9a854..c755402 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,13 @@
+2002-01-23  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
+
+       * elmo-localnews.el (elmo-localnews-folder-path): Moved from
+       elmo-vars.el.
+       * elmo-maildir.el (elmo-maildir-folder-path): Ditto.
+
+       * elmo-vars.el (elmo-localnews-folder-path): Removed.
+       (elmo-maildir-folder-path): Ditto.
+       (elmo-maildir-list): Ditto (abolished).
+
 2002-01-23  Kenichi OKADA  <okada@opaopa.org>
 
        * elmo-version.el (elmo-version): Up to 2.9.6.

diff --git a/elmo/elmo-localnews.el b/elmo/elmo-localnews.el
index 6908d81..8d533e3 100644 (file)
--- a/elmo/elmo-localnews.el
+++ b/elmo/elmo-localnews.el
@@ -32,6 +32,11 @@
 ;;
 (require 'elmo-localdir)
 
+(defcustom elmo-localnews-folder-path "~/News"
+  "*Local news folder path."
+  :type 'directory
+  :group 'elmo)
+
 (eval-and-compile
   (luna-define-class elmo-localnews-folder (elmo-localdir-folder) (group))
   (luna-define-internal-accessors 'elmo-localnews-folder))

diff --git a/elmo/elmo-maildir.el b/elmo/elmo-maildir.el
index 0a91115..8ff700d 100644 (file)
--- a/elmo/elmo-maildir.el
+++ b/elmo/elmo-maildir.el
@@ -35,6 +35,11 @@
 (require 'elmo)
 (require 'elmo-map)
 
+(defcustom elmo-maildir-folder-path "~/Maildir"
+  "*Maildir folder path."
+  :type 'directory
+  :group 'elmo)
+
 ;;; ELMO Maildir folder
 (eval-and-compile
   (luna-define-class elmo-maildir-folder

diff --git a/elmo/elmo-vars.el b/elmo/elmo-vars.el
index b9550a8..2a6e0ae 100644 (file)
--- a/elmo/elmo-vars.el
+++ b/elmo/elmo-vars.el
@@ -47,18 +47,7 @@
   :prefix "elmo-"
   :group 'elmo)
 
-;; Local
-(defcustom elmo-localnews-folder-path "~/News"
-  "*Local news folder path."
-  :type 'directory
-  :group 'elmo)
-(defcustom elmo-maildir-folder-path "~/Maildir"
-  "*Maildir folder path."
-  :type 'directory
-  :group 'elmo)
-(defvar elmo-maildir-list '("\\+~/Maildir")
-  "*All Folders that match this list will be treated as Maildir.
-Each elements are regexp of folder name (This is obsolete).")
+;; Message Database
 
 (defvar elmo-msgdb-file-header-chop-length 2048
   "*Number of bytes to get header in one reading from file.")