(color-values): Doc fix.

(face-differs-from-default-p): Don't check :foreground twice.

diff --git a/lisp/faces.el b/lisp/faces.el
index 7b521d385b1a8c0e42ba2f8b2900abeddd78ff75..53e3b004533a8f1126cd0ac587c3ceaa76e84626 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -248,8 +248,8 @@ If FRAME is t, report on the defaults for face FACE (for new frames).
 If FRAME is omitted or nil, use the selected frame."
   (let ((attrs
         '(:family :width :height :weight :slant :foreground
-          :foreground :background :underline :overline
-          :strike-through :box :inverse-video))
+          :background :underline :overline :strike-through
+          :box :inverse-video))
        (differs nil))
     (while (and attrs (not differs))
       (let* ((attr (pop attrs))
@@ -1541,7 +1541,7 @@ If COLOR is the symbol `unspecified' or one of the strings
 (defun color-values (color &optional frame)
   "Return a description of the color named COLOR on frame FRAME.
 The value is a list of integer RGB values--\(RED GREEN BLUE\).
-These values appear to range from 0 65535; white is \(65535 65535 65535\).
+These values range from 0 to 65535; white is \(65535 65535 65535\).
 If FRAME is omitted or nil, use the selected frame.
 If FRAME cannot display COLOR, the value is nil.
 If COLOR is the symbol `unspecified' or one of the strings