diff options
| author | Gerd Moellmann | 2000-02-25 14:05:03 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-02-25 14:05:03 +0000 |
| commit | 842650279c68418423f9d7e264416ab2575d86c8 (patch) | |
| tree | 37ccb8092b17e5d7b187a3f16acf05452dfad73d /src | |
| parent | f5b586154bd536c72e0fda305f688d701fc87928 (diff) | |
| download | emacs-842650279c68418423f9d7e264416ab2575d86c8.tar.gz emacs-842650279c68418423f9d7e264416ab2575d86c8.zip | |
(recursive_edit_1): Cancel busy-cursor.
Diffstat (limited to 'src')
| -rw-r--r-- | src/keyboard.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index ff94b42677c..75bafc28b83 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -858,6 +858,14 @@ recursive_edit_1 () | |||
| 858 | specbind (Qstandard_input, Qt); | 858 | specbind (Qstandard_input, Qt); |
| 859 | } | 859 | } |
| 860 | 860 | ||
| 861 | #ifdef HAVE_X_WINDOWS | ||
| 862 | /* The command loop has started a busy-cursor timer, so we have to | ||
| 863 | cancel it here, otherwise it will fire because the recursive edit | ||
| 864 | can take some time. */ | ||
| 865 | if (display_busy_cursor_p) | ||
| 866 | cancel_busy_cursor (); | ||
| 867 | #endif | ||
| 868 | |||
| 861 | val = command_loop (); | 869 | val = command_loop (); |
| 862 | if (EQ (val, Qt)) | 870 | if (EQ (val, Qt)) |
| 863 | Fsignal (Qquit, Qnil); | 871 | Fsignal (Qquit, Qnil); |