Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
f331f1f8
Commit
f331f1f8
authored
Nov 17, 2008
by
Chong Yidong
Browse files
(widget-image-insert): Don't add a mouse-face.
parent
58caa5cf
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
1 addition
and
5 deletions
+1
-5
lisp/wid-edit.el
lisp/wid-edit.el
+1
-5
No files found.
lisp/wid-edit.el
View file @
f331f1f8
...
...
@@ -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
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment