Re: address@hidden: RE: moving overlay loses its priority?]

[Chong Yidong]

Richard Stallman <address@hidden> writes:

> Would someone please DTRT and ack?

The original bug report is to complicated to work with, but the basic
problem (as noted by Kim Storm) is that inside a `track-mouse' form,
`read-event' is not returning mouse motion events if there is a
`help-echo' text property present (NOT `mouse-face' as mistakenly
stated in a previous thread).

I suspect the problem lies in note_mouse_movement in xterm.c, and that
it is related to the "tooltip frame" problems in that code that we
dealt with about a year ago.

Here is a simple way to reproduce the problem.

;; F2 to create the test buffer, then F3 to report mouse movements
(global-set-key [f2] 'test-mouse-track)
(global-set-key [f3] 'report-mouse-movements)

(defun test-mouse-track ()
  (interactive)
  (with-output-to-temp-buffer "Foo"
    (set-buffer "Foo")
    (erase-buffer)
    (insert (propertize "Mouse tracking is stuck here"
                        'help-echo "mouse-2: select this buffer"))))

(defun report-mouse-movements ()
  (interactive)
  (let (done read)
    (track-mouse
      (while (not done)
        (setq read (read-event))
        (if (eq (car-safe read) 'mouse-1)
            (setq done t)
          (message "%s" (prin1-to-string read)))))))