(custom-variable-type): Doc fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 569064d791060c834fd45ba7eea5e922adb74d2f..f5b63f375704c6b0504d69d0c9d361728db578e5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-06-11  Richard Stallman  <rms@gnu.org>
+
+       * cus-edit.el (custom-variable-type): Doc fix.
+
 2007-06-09  Alfred M. Szmidt  <ams@gnu.org>  (tiny change)
 
        * mail/rmail.el (rmail-movemail-variant-in-use): Fix doc typo.

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 4dae3bab018efcafde93341f00f510a03d575175..0984fc73e43c01364cb7952dfa62c33ca6dc8957 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2500,7 +2500,8 @@ However, setting it through Custom sets the default value.")
 (defun custom-variable-type (symbol)
   "Return a widget suitable for editing the value of SYMBOL.
 If SYMBOL has a `custom-type' property, use that.
-Otherwise, look up symbol in `custom-guess-type-alist'."
+Otherwise, try matching SYMBOL against `custom-guess-name-alist' and
+try matching its doc string against `custom-guess-doc-alist'."
   (let* ((type (or (get symbol 'custom-type)
                   (and (not (get symbol 'standard-value))
                        (custom-guess-type symbol))