(custom-face-attributes): Use editable-color widget.

diff --git a/lisp/cus-face.el b/lisp/cus-face.el
index 3662f296baa973fdcf366da8b61b60b30cf63384..9a823971ffdedbbbb71f7450c62277b186a104f9 100644 (file)
--- 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"