Mercurial > emacs
changeset 8098:e44c31d682b1
(x_draw_box): Use curs_x and curs_y, not f->cursor_[xy].
(x_make_frame_visible): In x_sync loop at the end,
every fourth time, sleep for 1/4 second.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 01 Jul 1994 00:32:05 +0000 |
| parents | f18272ebe3e6 |
| children | a06382fd175d |
| files | src/xterm.c |
| diffstat | 1 files changed, 16 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xterm.c Fri Jul 01 00:29:02 1994 +0000 +++ b/src/xterm.c Fri Jul 01 00:32:05 1994 +0000 @@ -4451,8 +4451,8 @@ x_draw_box (f) struct frame *f; { - int left = CHAR_TO_PIXEL_COL (f, f->cursor_x); - int top = CHAR_TO_PIXEL_ROW (f, f->cursor_y); + int left = CHAR_TO_PIXEL_COL (f, curs_x); + int top = CHAR_TO_PIXEL_ROW (f, curs_y); int width = FONT_WIDTH (f->display.x->font); int height = f->display.x->line_height; @@ -5568,9 +5568,22 @@ so that incoming events are handled. */ { Lisp_Object frame; + int one_in_four = 0; XSET (frame, Lisp_Frame, f); while (! f->async_visible) - x_sync (frame); + { + x_sync (frame); + /* On HPUX on the HP800, the sleep is needed sometimes. */ + if ((one_in_four & 3) == 0) + { +#ifdef EMACS_HAS_USECS + Fsleep_for (make_number (1), make_number (0)); +#else + Fsleep_for (make_number (0), make_number (250)); +#endif + } + one_in_four++; + } FRAME_SAMPLE_VISIBILITY (f); } }