From fc684909103d56a06c6ea3413dd17f465d83ce9e Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 15 Sep 2000 15:21:42 +0000 Subject: [PATCH] (toolbar-add-item): Use image-mask-p. --- lisp/toolbar/toolbar.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/toolbar/toolbar.el b/lisp/toolbar/toolbar.el index 927f38313e3..c58e617f3dc 100644 --- a/lisp/toolbar/toolbar.el +++ b/lisp/toolbar/toolbar.el @@ -74,7 +74,7 @@ Info node `(elisp)Image Descriptors')." (let ((image (find-image `((:type xbm :file ,(concat icon ".xbm")) (:type xpm :file ,(concat icon ".xpm")))))) (when image - (unless (memq 'xbm image) + (unless (image-mask-p image) (setq image (append image '(:mask heuristict)))) (if (memq :enable props) (let ((dis (append image '(:algorithm laplace)))) -- 2.39.2