(custom-variable-type): Doc fix.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 569064d7910..f5b63f37570 100644
--- 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 4dae3bab018..0984fc73e43 100644
--- 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))