diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/faces.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 5e0be118282..b765522914d 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1114,10 +1114,9 @@ returned. Otherwise, DEFAULT is returned verbatim." (lambda (faces) (mapcar (lambda (face) - (list (concat (propertize "SAMPLE" 'face face) - "\t") - "" - face)) + (list face + (concat (propertize "SAMPLE" 'face face) "\t") + "")) faces)))) aliasfaces nonaliasfaces faces) ;; Build up the completion tables. |