diff options
| -rw-r--r-- | lisp/wid-edit.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 202ee215b14..c0135f842b3 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el | |||
| @@ -662,11 +662,7 @@ button is pressed or inactive, respectively. These are currently ignored." | |||
| 662 | (if (and (display-graphic-p) | 662 | (if (and (display-graphic-p) |
| 663 | (setq image (widget-image-find image))) | 663 | (setq image (widget-image-find image))) |
| 664 | (progn (widget-put widget :suppress-face t) | 664 | (progn (widget-put widget :suppress-face t) |
| 665 | (insert-image image | 665 | (insert-image image tag)) |
| 666 | (propertize | ||
| 667 | ;; Use a `list' so it's unique and won't get | ||
| 668 | ;; accidentally merged with neighbouring images. | ||
| 669 | tag 'mouse-face (list widget-button-pressed-face)))) | ||
| 670 | (insert tag))) | 666 | (insert tag))) |
| 671 | 667 | ||
| 672 | (defun widget-move-and-invoke (event) | 668 | (defun widget-move-and-invoke (event) |