Commit ee09252a authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(set-face-background): Set either stipple or color,

never both.  Do this only for a specific frame, not for t.
parent 368b007a
......@@ -109,11 +109,14 @@ in that frame; otherwise change each frame."
If the optional FRAME argument is provided, change only
in that frame; otherwise change each frame."
(interactive (internal-face-interactive "background"))
(if (and frame (member color '("gray" "gray1" "gray3"))
;; For a specific frame, use gray stipple instead of gray color
;; if the display does not support a gray color.
(if (and frame (not (eq frame t))
(member color '("gray" "gray1" "gray3"))
(not (x-display-color-p frame))
(not (x-display-grayscale-p frame)))
(set-face-stipple face color frame))
(internal-set-face-1 face 'background color 5 frame))
(set-face-stipple face color frame)
(internal-set-face-1 face 'background color 5 frame)))
(defsubst set-face-stipple (face name &optional frame)
"Change the stipple pixmap of face FACE to PIXMAP.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment