Re: Mac OS X Carbon Emacs problem with mouse-2

[YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>]

>>>>> On Tue, 21 Sep 2004 14:36:51 +0200, Piet van Oostrum <piet@cs.uu.nl> said:

> When I click with the mouse wheel button, only a 'down-mouse-2'
> event is generated rather than a combo 'down-mouse-2 mouse-2' as it
> happens with mouse-3.

Could you test the following patch?  I can't test it because I don't
have a wheel mouse.

				     YAMAMOTO Mitsuharu
				mituharu@math.s.chiba-u.ac.jp

*** src/macterm.c.~1.77.~	Tue Sep 21 11:27:01 2004
--- src/macterm.c	Tue Sep 21 23:00:37 2004
***************
*** 7081,7092 ****
    if (!result && GetEventClass (eventRef) == kEventClassMouse)
      {
        UInt32 kind = GetEventKind (eventRef);
!       if (kind == kEventMouseDown && !(eventRec->what == mouseDown))
  	{
  	  eventRec->what = mouseDown;
  	  result=1;
  	}
!       if (kind == kEventMouseUp && !(eventRec->what == mouseUp))
  	{
  	  eventRec->what = mouseUp;
  	  result=1;
--- 7081,7092 ----
    if (!result && GetEventClass (eventRef) == kEventClassMouse)
      {
        UInt32 kind = GetEventKind (eventRef);
!       if (kind == kEventMouseDown)
  	{
  	  eventRec->what = mouseDown;
  	  result=1;
  	}
!       else if (kind == kEventMouseUp)
  	{
  	  eventRec->what = mouseUp;
  	  result=1;