Mercurial > emacs
changeset 99674:c52ab3389759
(widget-image-insert): Don't add a mouse-face.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 17 Nov 2008 18:37:47 +0000 |
parents | 1d9acf55fb04 |
children | b0ca8a5b94ae |
files | lisp/wid-edit.el |
diffstat | 1 files changed, 1 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/wid-edit.el Mon Nov 17 18:37:38 2008 +0000 +++ b/lisp/wid-edit.el Mon Nov 17 18:37:47 2008 +0000 @@ -662,11 +662,7 @@ (if (and (display-graphic-p) (setq image (widget-image-find image))) (progn (widget-put widget :suppress-face t) - (insert-image image - (propertize - ;; Use a `list' so it's unique and won't get - ;; accidentally merged with neighbouring images. - tag 'mouse-face (list widget-button-pressed-face)))) + (insert-image image tag)) (insert tag))) (defun widget-move-and-invoke (event)