Mercurial > hg > xemacs-beta
comparison src/event-Xt.c @ 5178:97eb4942aec8
merge
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Mon, 29 Mar 2010 21:28:13 -0500 |
parents | 8b2f75cecb89 a48ef26d87ee |
children | 71ee43b8a74d |
comparison
equal
deleted
inserted
replaced
5177:b785049378e3 | 5178:97eb4942aec8 |
---|---|
1 /* The event_stream interface for X11 with Xt, and/or tty frames. | 1 /* The event_stream interface for X11 with Xt, and/or tty frames. |
2 Copyright (C) 1991-5, 1997 Free Software Foundation, Inc. | 2 Copyright (C) 1991-5, 1997 Free Software Foundation, Inc. |
3 Copyright (C) 1995 Sun Microsystems, Inc. | 3 Copyright (C) 1995 Sun Microsystems, Inc. |
4 Copyright (C) 1996, 2001, 2002, 2003, 2010 Ben Wing. | 4 Copyright (C) 1996, 2001, 2002, 2003, 2010 Ben Wing. |
5 Copyright (C) 2010 Didier Verna | |
5 | 6 |
6 This file is part of XEmacs. | 7 This file is part of XEmacs. |
7 | 8 |
8 XEmacs is free software; you can redistribute it and/or modify it | 9 XEmacs is free software; you can redistribute it and/or modify it |
9 under the terms of the GNU General Public License as published by the | 10 under the terms of the GNU General Public License as published by the |
130 void debug_process_finalization (Lisp_Process *p); | 131 void debug_process_finalization (Lisp_Process *p); |
131 void emacs_Xt_event_handler (Widget wid, XtPointer closure, XEvent *event, | 132 void emacs_Xt_event_handler (Widget wid, XtPointer closure, XEvent *event, |
132 Boolean *continue_to_dispatch); | 133 Boolean *continue_to_dispatch); |
133 | 134 |
134 static int last_quit_check_signal_tick_count; | 135 static int last_quit_check_signal_tick_count; |
135 | |
136 Lisp_Object Qsans_modifiers; | |
137 | 136 |
138 #define THIS_IS_X | 137 #define THIS_IS_X |
139 #include "event-xlike-inc.c" | 138 #include "event-xlike-inc.c" |
140 | 139 |
141 | 140 |
1896 != VisibilityFullyObscured) ? 1 : -1); | 1895 != VisibilityFullyObscured) ? 1 : -1); |
1897 } | 1896 } |
1898 break; | 1897 break; |
1899 | 1898 |
1900 case ConfigureNotify: | 1899 case ConfigureNotify: |
1900 { | |
1901 XEvent xev; | |
1902 | |
1903 /* Let's eat all events of that type to avoid useless | |
1904 reconfigurations. */ | |
1905 while (XCheckTypedWindowEvent | |
1906 (DEVICE_X_DISPLAY (XDEVICE (FRAME_DEVICE (f))), | |
1907 XtWindow (FRAME_X_TEXT_WIDGET (f)), | |
1908 ConfigureNotify, | |
1909 &xev) | |
1910 == True); | |
1911 } | |
1912 /* #### NOTE: in fact, the frame faces didn't really change, but if some | |
1913 #### of them have their background-placement property set to | |
1914 #### absolute, we need a redraw. This is semantically equivalent to | |
1915 #### changing the background pixmap. -- dvl */ | |
1916 x_get_frame_text_position (f); | |
1917 MARK_FRAME_FACES_CHANGED (f); | |
1918 | |
1901 #ifdef HAVE_XIM | 1919 #ifdef HAVE_XIM |
1902 XIM_SetGeometry (f); | 1920 XIM_SetGeometry (f); |
1903 #endif | 1921 #endif |
1904 break; | 1922 break; |
1905 | 1923 |
3022 /************************************************************************/ | 3040 /************************************************************************/ |
3023 | 3041 |
3024 void | 3042 void |
3025 syms_of_event_Xt (void) | 3043 syms_of_event_Xt (void) |
3026 { | 3044 { |
3027 DEFSYMBOL (Qsans_modifiers); | |
3028 DEFSYMBOL (Qself_insert_command); | |
3029 } | 3045 } |
3030 | 3046 |
3031 void | 3047 void |
3032 reinit_vars_of_event_Xt (void) | 3048 reinit_vars_of_event_Xt (void) |
3033 { | 3049 { |