From 9432de85b71b2bfd752d801e34b24011a036ad22 Mon Sep 17 00:00:00 2001 From: Per Abrahamsen Date: Sun, 15 Jun 1997 15:25:57 +0000 Subject: [PATCH] Use booleans. --- lisp/cus-face.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/lisp/cus-face.el b/lisp/cus-face.el index 773dbccd8d8..3662f296baa 100644 --- a/lisp/cus-face.el +++ b/lisp/cus-face.el @@ -63,22 +63,22 @@ ;;; Font Attributes. (defconst custom-face-attributes - '((:bold (toggle :format "%[Bold%]: %v\n" - :help-echo "Control whether a bold font should be used.") + '((:bold (boolean :tag "Bold" + :help-echo "Control whether a bold font should be used.") set-face-bold-p face-bold-p) - (:italic (toggle :format "%[Italic%]: %v\n" - :help-echo "\ + (:italic (boolean :tag "Italic" + :help-echo "\ Control whether an italic font should be used.") set-face-italic-p face-italic-p) - (:underline (toggle :format "%[Underline%]: %v\n" - :help-echo "\ + (:underline (boolean :tag "Underline" + :help-echo "\ Control whether the text should be underlined.") set-face-underline-p face-underline-p) - (:inverse-video (toggle :format "%[Inverse-Video%]: %v\n" - :help-echo "\ + (:inverse-video (boolean :tag "Inverse Video" + :help-echo "\ Control whether the text should be in inverse video.") set-face-inverse-video-p face-inverse-video-p) -- 2.39.5