Mercurial > emacs
annotate src/dosfns.h @ 93072:e54658ddb618
* w32fns.c (hourglass_timer, hourglass_hwnd): New variables.
(syms_of_w32fns): Initialize them.
(HOURGLASS_ID): New constant.
(x_window_to_frame): Don't check hourglass_window.
(w32_wnd_proc) <WM_TIMER>: Handle hourglass_timer.
(w32_wnd_proc) <WM_EXITMENULOOP>: Set pending hourglass cursor.
(w32_wnd_proc) <WM_SETCURSOR>: Set the hourglass or current cursor.
(w32_wnd_proc) <WM_EMACS_SETCURSOR>: Set frame's current_cursor.
Only change the cursor if hourglass is not active.
(Fx_create_frame): Initialize frame's current_cursor.
(hourglass_atimer): Remove.
(hourglass_started): New function.
(start_hourglass, cancel_hourglass, hide_hourglass): Adapt to w32.
(show_hourglass): Adapt to w32, changing argument to frame.
* w32term.h (struct w32_output): Remove hourglass_window.
Add current_cursor.
* eval.c (call_debugger, Fsignal):
* keyboard.c (recursive_edit_1, cmd_error, Ftop_level)
(command_loop_1, Fread_key_sequence, Fread_key_sequence_vector)
(Fexecute_extended_command, cancel_hourglass_unwind):
* minibuf.c (read_minibuf):
* fns.c (Fy_or_n_p): Enable hourglass when HAVE_WINDOW_SYSTEM.
author | Jason Rumney <jasonr@gnu.org> |
---|---|
date | Wed, 19 Mar 2008 17:02:46 +0000 |
parents | fc2bcd2a8aad |
children | 606f2d163a64 29adfc9354e7 |
rev | line source |
---|---|
5503 | 1 /* MS-DOS specific Lisp utilities interface. |
2 Coded by Manabu Higashida, 1991. | |
36513 | 3 Modified by Morten Welinder, 1993-1994. |
4 | |
75227
e90d04cd455a
Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents:
68651
diff
changeset
|
5 Copyright (C) 1991, 1994, 1995, 1997, 1999, 2001, 2002, 2003, 2004, |
79759 | 6 2005, 2006, 2007, 2008 Free Software Foundation, Inc. |
5503 | 7 |
8 This file is part of GNU Emacs. | |
9 | |
10 GNU Emacs is free software; you can redistribute it and/or modify | |
11 it under the terms of the GNU General Public License as published by | |
78260
922696f363b0
Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents:
75227
diff
changeset
|
12 the Free Software Foundation; either version 3, or (at your option) |
5503 | 13 any later version. |
14 | |
15 GNU Emacs is distributed in the hope that it will be useful, | |
16 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 GNU General Public License for more details. | |
19 | |
20 You should have received a copy of the GNU General Public License | |
21 along with GNU Emacs; see the file COPYING. If not, write to | |
64084 | 22 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
23 Boston, MA 02110-1301, USA. */ | |
5503 | 24 |
43713
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
25 extern EMACS_INT dos_hyper_key; |
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
26 extern EMACS_INT dos_super_key; |
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
27 extern EMACS_INT dos_decimal_point; |
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
28 extern EMACS_INT dos_keypad_mode; |
13181
fc4f18921b24
(dos_timezone_offset, dos_display_scancodes,
Kim F. Storm <storm@cua.dk>
parents:
10504
diff
changeset
|
29 |
43713
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
30 extern EMACS_INT dos_keyboard_layout; |
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
31 extern EMACS_INT dos_country_code; |
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
32 extern EMACS_INT dos_codepage; |
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
36513
diff
changeset
|
33 extern EMACS_INT dos_timezone_offset; |
13181
fc4f18921b24
(dos_timezone_offset, dos_display_scancodes,
Kim F. Storm <storm@cua.dk>
parents:
10504
diff
changeset
|
34 |
fc4f18921b24
(dos_timezone_offset, dos_display_scancodes,
Kim F. Storm <storm@cua.dk>
parents:
10504
diff
changeset
|
35 #define DOS_COUNTRY_INFO 34 /* no of bytes returned by dos int 38h */ |
fc4f18921b24
(dos_timezone_offset, dos_display_scancodes,
Kim F. Storm <storm@cua.dk>
parents:
10504
diff
changeset
|
36 extern unsigned char dos_country_info[DOS_COUNTRY_INFO]; |
fc4f18921b24
(dos_timezone_offset, dos_display_scancodes,
Kim F. Storm <storm@cua.dk>
parents:
10504
diff
changeset
|
37 |
5503 | 38 extern Lisp_Object Vdos_version; |
20035
0d4dec332d85
Declare Vdos_windows_version.
Eli Zaretskii <eliz@gnu.org>
parents:
14186
diff
changeset
|
39 extern Lisp_Object Vdos_windows_version; |
9572 | 40 #ifndef HAVE_X_WINDOWS |
13181
fc4f18921b24
(dos_timezone_offset, dos_display_scancodes,
Kim F. Storm <storm@cua.dk>
parents:
10504
diff
changeset
|
41 extern Lisp_Object Vdos_display_scancodes; |
25112
8bf9ad7816a8
(msdos_stdcolor_name, msdos_stdcolor_idx): Declare.
Eli Zaretskii <eliz@gnu.org>
parents:
20035
diff
changeset
|
42 |
8bf9ad7816a8
(msdos_stdcolor_name, msdos_stdcolor_idx): Declare.
Eli Zaretskii <eliz@gnu.org>
parents:
20035
diff
changeset
|
43 extern int msdos_stdcolor_idx P_ ((const char *)); |
26729
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25212
diff
changeset
|
44 extern Lisp_Object msdos_stdcolor_name P_ ((int)); |
9572 | 45 #endif |
52401 | 46 |
47 /* arch-tag: a83b8c4c-63c8-451e-9e94-bc72e3e2f8bc | |
48 (do not change this comment) */ |