Lines Matching defs:browse
362 (defgroup custom-browse nil
683 (defcustom custom-browse-sort-alphabetically nil
684 "If non-nil, sort customization group alphabetically in `custom-browse'."
686 :group 'custom-browse)
688 (defcustom custom-browse-order-groups nil
695 :group 'custom-browse)
697 (defcustom custom-browse-only-groups nil
700 :group 'custom-browse)
1685 (defun customize-browse (&optional group)
1702 (if custom-browse-only-groups
1731 (define-widget 'custom-browse-visibility 'item
1734 :action 'custom-browse-visibility-action)
1736 (defun custom-browse-visibility-action (widget &rest ignore)
1740 (define-widget 'custom-browse-group-tag 'custom-group-link
1744 :action 'custom-browse-group-tag-action)
1746 (defun custom-browse-group-tag-action (widget &rest ignore)
1750 (define-widget 'custom-browse-variable-tag 'custom-group-link
1754 :action 'custom-browse-variable-tag-action)
1756 (defun custom-browse-variable-tag-action (widget &rest ignore)
1760 (define-widget 'custom-browse-face-tag 'custom-group-link
1764 :action 'custom-browse-face-tag-action)
1766 (defun custom-browse-face-tag-action (widget &rest ignore)
1770 (defconst custom-browse-alist '((" " "space")
1776 (defun custom-browse-insert-prefix (prefix)
1786 (name (nth 1 (assoc entry custom-browse-alist))))
2550 widget 'custom-browse-variable-tag)
3319 widget 'custom-browse-face-tag)
3815 custom-browse-only-groups))))
3819 (custom-browse-insert-prefix prefix)
3821 widget 'custom-browse-visibility
3828 widget 'custom-browse-group-tag)
3834 (custom-browse-insert-prefix prefix)
3839 widget 'custom-browse-group-tag)
3844 (custom-browse-insert-prefix prefix)
3847 (custom-browse-insert-prefix prefix)
3852 widget 'custom-browse-group-tag)
3857 widget 'custom-browse-visibility
3864 widget 'custom-browse-group-tag)
3870 custom-browse-sort-alphabetically
3871 custom-browse-order-groups))