summaryrefslogtreecommitdiff
path: root/lisp/facemenu.el
diff options
context:
space:
mode:
authorIvan Shmakov <ivan@siamics.net>2015-02-26 18:09:48 +0000
committerIvan Shmakov <ivan@siamics.net>2015-02-26 18:09:48 +0000
commit619fc5c197ebef5444aed24fe30657989fc2a839 (patch)
treeb72fe2090fed30313f1eff9435b673cd22b14efa /lisp/facemenu.el
parent5917b7907ad0cdc38f14967d16aa8472be572e3f (diff)
downloademacs-619fc5c197ebef5444aed24fe30657989fc2a839.tar.gz
Fix 'face property handling in facemenu-add-face.
* lisp/faces.el (face-list-p): Split from face-at-point. (face-at-point): Use it. * lisp/facemenu.el (facemenu-add-face): Likewise. Fixes: debbugs:19912
Diffstat (limited to 'lisp/facemenu.el')
-rw-r--r--lisp/facemenu.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index 1a765f9ebdb..2c246b44d54 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -732,7 +732,7 @@ effect. See `facemenu-remove-face-function'."
face
(facemenu-active-faces
(cons face
- (if (listp prev)
+ (if (face-list-p prev)
prev
(list prev)))
;; Specify the selected frame