Mercurial > emacs
changeset 31638:77a8522f11d4
(toolbar-add-item): Use image-mask-p.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 15 Sep 2000 15:21:42 +0000 |
| parents | c1f4bdbf8465 |
| children | 1c5bd105d7dc |
| files | lisp/toolbar/toolbar.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/toolbar/toolbar.el Fri Sep 15 15:19:03 2000 +0000 +++ b/lisp/toolbar/toolbar.el Fri Sep 15 15:21:42 2000 +0000 @@ -74,7 +74,7 @@ (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))))