diff options
| author | Miles Bader | 2007-06-14 09:59:49 +0000 |
|---|---|---|
| committer | Miles Bader | 2007-06-14 09:59:49 +0000 |
| commit | 7e76cdd807ee8253c2115ca9cdcd457f98ef01ac (patch) | |
| tree | 4b2e2d804e0cdb552223b4e00c964539cc5618fb /lisp/cus-edit.el | |
| parent | 446ba96f1f6d175e07f388fb8e571355dd00465f (diff) | |
| parent | 524705ae2da95c571fedb83b3a1c3a80e1335a72 (diff) | |
| download | emacs-7e76cdd807ee8253c2115ca9cdcd457f98ef01ac.tar.gz emacs-7e76cdd807ee8253c2115ca9cdcd457f98ef01ac.zip | |
Merge from emacs--rel--22
Patches applied:
* emacs--rel--22 (patch 43-44)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 229)
- Merge from emacs--devo--0, emacs--rel--22
2007-06-11 Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/font-lock.el (font-lock-add-keywords): In case font-lock was only
half-activated, forcefully activate it completely.
2007-06-11 Richard M. Stallman <rms@gnu.org>
* lisp/cus-edit.el (custom-variable-type): Doc fix.
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-797
Diffstat (limited to 'lisp/cus-edit.el')
| -rw-r--r-- | lisp/cus-edit.el | 3 |
1 files changed, 2 insertions, 1 deletions
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.") | |||
| 2500 | (defun custom-variable-type (symbol) | 2500 | (defun custom-variable-type (symbol) |
| 2501 | "Return a widget suitable for editing the value of SYMBOL. | 2501 | "Return a widget suitable for editing the value of SYMBOL. |
| 2502 | If SYMBOL has a `custom-type' property, use that. | 2502 | If SYMBOL has a `custom-type' property, use that. |
| 2503 | Otherwise, look up symbol in `custom-guess-type-alist'." | 2503 | Otherwise, try matching SYMBOL against `custom-guess-name-alist' and |
| 2504 | try matching its doc string against `custom-guess-doc-alist'." | ||
| 2504 | (let* ((type (or (get symbol 'custom-type) | 2505 | (let* ((type (or (get symbol 'custom-type) |
| 2505 | (and (not (get symbol 'standard-value)) | 2506 | (and (not (get symbol 'standard-value)) |
| 2506 | (custom-guess-type symbol)) | 2507 | (custom-guess-type symbol)) |