From: Gerd Moellmann Date: Wed, 17 Nov 1999 21:03:12 +0000 (+0000) Subject: (Fx_show_busy_cursor): Doc-fix. X-Git-Tag: emacs-pretest-21.0.90~6076 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dc6f74cf0ee7e6f3a90442335dbfea1d8072f149;p=emacs.git (Fx_show_busy_cursor): Doc-fix. (Fx_hide_busy_cursor): Ditto. --- diff --git a/src/xfns.c b/src/xfns.c index 28748091279..ffa8e6e495f 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -9404,7 +9404,7 @@ DEFUN ("x-show-busy-cursor", Fx_show_busy_cursor, Sx_show_busy_cursor, 0, 0, 0, "Show a busy cursor, if not already shown.\n\ Each call to this function must be matched by a call to\n\ -x-undisplay-busy-cursor to make the busy pointer disappear again.") +`x-hide-busy-cursor' to make the busy pointer disappear again.") () { ++busy_count; @@ -9426,11 +9426,13 @@ x-undisplay-busy-cursor to make the busy pointer disappear again.") XSetWindowAttributes attrs; attrs.cursor = f->output_data.x->busy_cursor; + f->output_data.x->busy_window = XCreateWindow (FRAME_X_DISPLAY (f), FRAME_OUTER_WINDOW (f), 0, 0, 32000, 32000, 0, 0, - InputOnly, CopyFromParent, + InputOnly, + CopyFromParent, mask, &attrs); } @@ -9447,8 +9449,8 @@ DEFUN ("x-hide-busy-cursor", Fx_hide_busy_cursor, Sx_hide_busy_cursor, 0, 1, 0, "Hide a busy-cursor.\n\ A busy-cursor will actually be undisplayed when a matching\n\ -`x-undisplay-busy-cursor' is called for each `x-display-busy-cursor'\n\ -issued. FORCE non-nil means undisplay the busy-cursor forcibly,\n\ +`x-hide-busy-cursor' is called for each `x-show-busy-cursor'\n\ +issued. FORCE non-nil means hide the busy-cursor forcibly,\n\ not counting calls.") (force) Lisp_Object force;