]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix setting stipple via `set-face-stipple'
authorPo Lu <luangruo@yahoo.com>
Sun, 8 May 2022 05:28:11 +0000 (05:28 +0000)
committerPo Lu <luangruo@yahoo.com>
Sun, 8 May 2022 05:28:11 +0000 (05:28 +0000)
* lisp/faces.el (face-valid-attribute-values): Return results
for `:stipple' in correct format.

lisp/faces.el

index 395ea315bae5086ca444c98562bb027dd087b732..1ada05a7b8bf17009d5caa726d04e5af7dc883bb 100644 (file)
@@ -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)