mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-04 11:40:22 +00:00
2001-09-04 Andrew Choi <akochoi@cse.cuhk.edu.hk>
* src/macterm.c (XTread_socket): Read all pending events in the event queue instead of one.
This commit is contained in:
parent
9f1821c7df
commit
1305f1a7f4
@ -1,5 +1,8 @@
|
||||
2001-09-04 Andrew Choi <akochoi@cse.cuhk.edu.hk>
|
||||
|
||||
* src/macterm.c (XTread_socket): Read all pending events in the
|
||||
event queue instead of one.
|
||||
|
||||
* makefile.MPW: Generate etc/DOC file from .elc files instead of
|
||||
.el files.
|
||||
|
||||
|
@ -11356,7 +11356,7 @@ do_os_event (EventRecord *erp)
|
||||
do_app_suspend ();
|
||||
break;
|
||||
|
||||
case mouseMovedMessage:
|
||||
case mouseMovedMessage: /* never reached */
|
||||
do_mouse_moved (erp->where);
|
||||
break;
|
||||
}
|
||||
@ -11826,7 +11826,7 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
if (NILP (Fboundp (Qmac_ready_for_drag_n_drop)))
|
||||
event_mask -= highLevelEventMask;
|
||||
|
||||
if (WaitNextEvent (event_mask, &er, (expected ? app_sleep_time : 0L), NULL))
|
||||
while (WaitNextEvent (event_mask, &er, 0L, NULL) && numchars > 0)
|
||||
switch (er.what)
|
||||
{
|
||||
case mouseDown:
|
||||
@ -11859,6 +11859,8 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
mouse_tracking_in_progress = mouse_tracking_none;
|
||||
tracked_scroll_bar = NULL;
|
||||
count++;
|
||||
bufp++;
|
||||
numchars--;
|
||||
break;
|
||||
}
|
||||
|
||||
@ -11874,6 +11876,8 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
bufp->kind = menu_bar_activate_event;
|
||||
XSETFRAME (bufp->frame_or_window, f);
|
||||
count++;
|
||||
bufp++;
|
||||
numchars--;
|
||||
}
|
||||
break;
|
||||
|
||||
@ -11938,6 +11942,8 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
}
|
||||
|
||||
count++;
|
||||
bufp++;
|
||||
numchars--;
|
||||
}
|
||||
break;
|
||||
|
||||
@ -11952,6 +11958,8 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
XSETFRAME (bufp->frame_or_window,
|
||||
((mac_output *) GetWRefCon (window_ptr))->mFP);
|
||||
count++;
|
||||
bufp++;
|
||||
numchars--;
|
||||
}
|
||||
break;
|
||||
|
||||
@ -12088,6 +12096,8 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
bufp->timestamp = er.when * (1000 / 60); /* ticks to milliseconds */
|
||||
|
||||
count++;
|
||||
bufp++;
|
||||
numchars--;
|
||||
break;
|
||||
|
||||
case kHighLevelEvent:
|
||||
@ -12129,6 +12139,8 @@ XTread_socket (int sd, struct input_event *bufp, int numchars, int expected)
|
||||
InvalRect (&(wp->portRect));
|
||||
|
||||
count++;
|
||||
bufp++;
|
||||
numchars--;
|
||||
}
|
||||
|
||||
default:
|
||||
|
Loading…
Reference in New Issue
Block a user