mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(widget-image-insert): Don't add a mouse-face.

Browse source
This commit is contained in:
Chong Yidong 2008-11-17 18:37:47 +00:00
parent 58caa5cf70
commit f331f1f80c
1 changed files with 1 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/wid-edit.el
View file

@ -662,11 +662,7 @@ button is pressed or inactive, respectively. These are currently ignored."
(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)