* elmo-util.el (elmo-obsolete-variable-show-warnings): Define with defcustom;

Set default value as t.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 35266d4..d68191f 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2001-12-11  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * elmo-util.el (elmo-obsolete-variable-show-warnings): Define with
+       defcustom; Set default value as t.
+
 2001-12-10  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * pldap.el (ldap-ldif-field-name-regexp): Changed regexp.

diff --git a/elmo/elmo-util.el b/elmo/elmo-util.el
index 502d5dd..0be8261 100644 (file)
--- a/elmo/elmo-util.el
+++ b/elmo/elmo-util.el
@@ -1823,7 +1823,11 @@ If KBYTES is kilo bytes (This value must be float)."
   (display-buffer elmo-warning-buffer-name))
 
 (defvar elmo-obsolete-variable-alist nil)
-(defvar elmo-obsolete-variable-show-warnings nil)
+
+(defcustom elmo-obsolete-variable-show-warnings t
+  "Show warning window if obsolete variable is treated."
+  :type 'boolean
+  :group 'elmo)
 
 (defun elmo-define-obsolete-variable (obsolete var)
   "Define obsolete variable.