(custom-variable-type): Doc fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 569064d..f5b63f3 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 4dae3ba..0984fc7 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))