Mercurial > emacs
changeset 31649:fe990a5df9d3
(toolbar-add-item): Use the same image
specification if or if not tool-bar item contains an `:enabled'
property.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 15 Sep 2000 21:00:32 +0000 |
parents | 2e692da8f736 |
children | 8b3846ae64fe |
files | lisp/toolbar/toolbar.el |
diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/toolbar/toolbar.el Fri Sep 15 20:59:32 2000 +0000 +++ b/lisp/toolbar/toolbar.el Fri Sep 15 21:00:32 2000 +0000 @@ -75,10 +75,7 @@ (:type xpm :file ,(concat icon ".xpm")))))) (when image (unless (image-mask-p image) - (setq image (append image '(:mask heuristict)))) - (if (memq :enable props) - (let ((dis (append image '(:algorithm laplace)))) - (setq image (vector image image dis dis)))) + (setq image (append image '(:mask heuristic)))) (define-key-after (or map toolbar-global-map) (vector key) `(menu-item ,(symbol-name key) ,def :image ,image ,@props)))))