diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-04 16:29:06 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-04 16:29:06 +0200 |
| commit | ad6878005dbde428809c1f587555238892dd253d (patch) | |
| tree | caa0740feaa03f1a91f9ef7a42c941d2daff9bf5 /lisp/wid-edit.el | |
| parent | 9aed695241a8919d422d5812dd62325720961153 (diff) | |
| download | emacs-ad6878005dbde428809c1f587555238892dd253d.tar.gz | |
Add a basic widget type for buffer predicates
* lisp/paren.el (show-paren-predicate):
* lisp/outline.el (outline-minor-mode-use-buttons): Use it.
* lisp/wid-edit.el (buffer-predicate): New widget type.
Diffstat (limited to 'lisp/wid-edit.el')
| -rw-r--r-- | lisp/wid-edit.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index ec2eb146e90..9aec6b02441 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -4145,6 +4145,15 @@ is inline." (define-obsolete-function-alias 'widget-visibility-value-create #'widget-toggle-value-create "29.1") +;;; Buffer predicates. +(define-widget 'buffer-predicate 'lazy + "A buffer predicate." + :tag "Buffer predicate" + :type '(choice (const :tag "All buffers" t) + (const :tag "No buffers" nil) + ;; FIXME: This should be expanded somehow. + sexp)) + (provide 'wid-edit) ;;; wid-edit.el ends here |