Re: How to bind a command to mouse-1 properly?

[martin rudalics]

> If you look at my examples, the "non-working" one does exactly the same
> thing as the working one. The only difference is the command name.
> I guess the reason is in this mouse-drag-track code:
>
>     ;; Find its binding.
>     (let* ((fun (key-binding (vector (car event))))
>            (do-multi-click (and (> (event-click-count event) 0)
>                                 (functionp fun)
>                                 (not (memq fun '(mouse-set-point
>                                                  mouse-set-region))))))

Probably.  Ever since that change I get an active region in at least
three independent contexts, one of them being Info.  But I was too lazy
to look into this issue yet.

martin