(custom-variable-type): Doc fix.
This commit is contained in:
parent
f9de989afe
commit
f0fc85830b
2 changed files with 6 additions and 1 deletions
|
@ -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)
|
2007-06-09 Alfred M. Szmidt <ams@gnu.org> (tiny change)
|
||||||
|
|
||||||
* mail/rmail.el (rmail-movemail-variant-in-use): Fix doc typo.
|
* mail/rmail.el (rmail-movemail-variant-in-use): Fix doc typo.
|
||||||
|
|
|
@ -2500,7 +2500,8 @@ However, setting it through Custom sets the default value.")
|
||||||
(defun custom-variable-type (symbol)
|
(defun custom-variable-type (symbol)
|
||||||
"Return a widget suitable for editing the value of SYMBOL.
|
"Return a widget suitable for editing the value of SYMBOL.
|
||||||
If SYMBOL has a `custom-type' property, use that.
|
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)
|
(let* ((type (or (get symbol 'custom-type)
|
||||||
(and (not (get symbol 'standard-value))
|
(and (not (get symbol 'standard-value))
|
||||||
(custom-guess-type symbol))
|
(custom-guess-type symbol))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue