# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 867913939 0
# Node ID 2e91237ac14cecce1267d00c1e7f040c5b7b0256
# Parent  f0c2a091d91f5fe07eba4f9c7222b1aafd38d5d0
(custom-face-attributes): Use editable-color widget.

diff -r f0c2a091d91f -r 2e91237ac14c lisp/cus-face.el
--- a/lisp/cus-face.el	Thu Jul 03 07:11:10 1997 +0000
+++ b/lisp/cus-face.el	Thu Jul 03 07:12:19 1997 +0000
@@ -82,14 +82,14 @@
 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"