From a1057d5616bbb3c76bad47bfb3f44b7103f182e1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 3 Jul 1997 07:12:19 +0000 Subject: [PATCH] (custom-face-attributes): Use editable-color widget. --- lisp/cus-face.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/lisp/cus-face.el b/lisp/cus-face.el index 3662f296baa..9a823971ffd 100644 --- a/lisp/cus-face.el +++ b/lisp/cus-face.el @@ -82,14 +82,14 @@ Control whether the text should be underlined.") Control whether the text should be in inverse video.") set-face-inverse-video-p face-inverse-video-p) - (:foreground (color :tag "Foreground" - :value "black" - :help-echo "Set foreground color.") + (:foreground (editable-color :tag "Foreground" + :value "black" + :help-echo "Set foreground color.") set-face-foreground face-foreground) - (:background (color :tag "Background" - :value "white" - :help-echo "Set background color.") + (:background (editable-color :tag "Background" + :value "white" + :help-echo "Set background color.") set-face-background face-background) (:stipple (editable-field :format "Stipple: %v" -- 2.39.2