From: Po Lu <luangruo@yahoo.com>
Date: Sun, 8 May 2022 05:28:11 +0000 (+0000)
Subject: Fix setting stipple via `set-face-stipple'
X-Git-Tag: emacs-29.0.90~1910^2~916
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7474b55e2812ec11f55817429b5e8815710e5112;p=emacs.git

Fix setting stipple via `set-face-stipple'

* lisp/faces.el (face-valid-attribute-values): Return results
for `:stipple' in correct format.
---

diff --git a/lisp/faces.el b/lisp/faces.el
index 395ea315bae..1ada05a7b8b 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1203,7 +1203,8 @@ an integer value."
             'integerp)
            (:stipple
             (and (memq (window-system frame) '(x ns pgtk haiku)) ; No stipple on w32
-                 (mapcar #'list
+                 (mapcar (lambda (item)
+                           (cons item item))
                          (apply #'nconc
                                 (mapcar (lambda (dir)
                                           (and (file-readable-p dir)