From 2a6cf806e2c2b937d37dcfec0b66f58eef053ca1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 1 Jul 1994 00:32:05 +0000 Subject: [PATCH] (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. --- src/xterm.c | 19 ++++++++++++++++--- 1 file changed, 16 insertions(+), 3 deletions(-) diff --git a/src/xterm.c b/src/xterm.c index 09f919cf462..d859ffdfee4 100644 --- a/src/xterm.c +++ b/src/xterm.c @@ -4451,8 +4451,8 @@ static void 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 @@ x_make_frame_visible (f) 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); } } -- 2.39.5