all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* mouse click on an overlay, using overlay `keymap' property
@ 2008-03-16 23:21 Drew Adams
  2008-03-18  9:28 ` martin rudalics
  0 siblings, 1 reply; 7+ messages in thread
From: Drew Adams @ 2008-03-16 23:21 UTC (permalink / raw)
  To: 'emacs- devel'

Could someone please explain what's happening here, and why? How can I get
the overlay's keymap to be in effect over all of the visual (displayed) area
of the overlay?

(setq foo-map (make-sparse-keymap))
(define-key foo-map [mouse-2] 'bar)

(defun foo (beg end)
  (interactive "r")
  (let ((overlay (make-overlay beg end)))
    (overlay-put
     overlay 'display
     (propertize "xxxxxxxxx" 'face 'font-lock-constant-face))
    (overlay-put overlay 'keymap foo-map)))

(defun bar (event) (interactive "e") (message "BAR"))

Here's some text: aaaaaaaaaaaaaaaaaaaaaaa

Select one or more of the a's and do M-x foo, to apply the overlay to just
those a's.

Put point somewhere outside the displayed "xxxxxxxxx" overlay.

Click mouse-2 anywhere on the displayed "xxxxxxxxx". What happens, it seems,
is that, since point is not on the a's that have the overlay, keymap foo-map
doesn't apply. Clicking mouse-2 therefore just calls the default mouse-2
binding, e.g. mouse-yank-at-click. That sets point so that it is at the
beginning of the overlaid text, so that a second mouse-2 click on the
displayed "xxxxxxxxx" does call bar.

If that's what's happening, how can foo be defined so that a first click on
the displayed "xxxxxxxxx" calls bar?

I'm probably not understanding this well - help appreciated. I'm guessing
that the mouse click on the overlay is noted not as being a click on a
buffer position that has the overlay but on a buffer position that is under
the displayed "xxxxxxxxx" but is actually outside the text that has the
overlay.

What I'm looking for is for the click to be perceived by Emacs as happening
on the overlay, and for the overlay's keymap to apply over the full extent
of the overlay, not just at its beginning, causing the overlay's keymap
binding to take effect.

[Note that I'm specifically asking about overlays here, not text properties.
I know how to create clickable text using text properties.]





^ permalink raw reply	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2008-03-18 19:37 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2008-03-16 23:21 mouse click on an overlay, using overlay `keymap' property Drew Adams
2008-03-18  9:28 ` martin rudalics
2008-03-18 15:08   ` Drew Adams
2008-03-18 18:27     ` martin rudalics
2008-03-18 18:44       ` Drew Adams
2008-03-18 19:06         ` martin rudalics
2008-03-18 19:37           ` Drew Adams

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.