changeset 45724:ee1a7b81cb0e

(custom-display): Add support for `supports' predicate.
author Miles Bader <miles@gnu.org>
date Mon, 10 Jun 2002 02:47:18 +0000
parents 5b5e4677c057
children abb237aa3c61
files lisp/cus-edit.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Mon Jun 10 02:15:24 2002 +0000
+++ b/lisp/cus-edit.el	Mon Jun 10 02:47:18 2002 +0000
@@ -2627,7 +2627,11 @@
 				    (const :format "Dark\n"
 					   :sibling-args (:help-echo "\
 Match frames with dark backgrounds.")
-					   dark)))))))
+					   dark)))
+		  (group :sibling-args (:help-echo "\
+Only match frames that support the specified face attributes.")
+			 (const :format "Supports attributes:" supports)
+			 (custom-face-edit :format "%n%v"))))))
 
 ;;; The `custom-face' Widget.