Mercurial > emacs
comparison lisp/cus-edit.el @ 35265:71b043afa1da
(customize-menu-create): Fix the :filter.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Fri, 12 Jan 2001 12:58:03 +0000 |
| parents | dca808278c39 |
| children | d85fe63db92b |
comparison
equal
deleted
inserted
replaced
| 35264:689589ab80b3 | 35265:71b043afa1da |
|---|---|
| 3706 The format is suitable for use with `easy-menu-define'." | 3706 The format is suitable for use with `easy-menu-define'." |
| 3707 (unless name | 3707 (unless name |
| 3708 (setq name "Customize")) | 3708 (setq name "Customize")) |
| 3709 `(,name | 3709 `(,name |
| 3710 :filter (lambda (&rest junk) | 3710 :filter (lambda (&rest junk) |
| 3711 (cdr (custom-menu-create ',symbol))))) | 3711 (custom-menu-create ',symbol)))) |
| 3712 | 3712 |
| 3713 ;;; The Custom Mode. | 3713 ;;; The Custom Mode. |
| 3714 | 3714 |
| 3715 (defvar custom-mode-map nil | 3715 (defvar custom-mode-map nil |
| 3716 "Keymap for `custom-mode'.") | 3716 "Keymap for `custom-mode'.") |