From: teranisi <teranisi>
Date: Tue, 11 Dec 2001 00:25:06 +0000 (+0000)
Subject: * elmo-util.el (elmo-obsolete-variable-show-warnings): Define with defcustom;
X-Git-Tag: wl-2_8-root~55
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=87d4a38041e3894415eeac38b45cc3d4b5df2fda;p=elisp%2Fwanderlust.git

* 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
--- 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
--- 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.