Mercurial > emacs

comparison src/widget.c @ 12052:942ad27b8e10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(EmacsFrameDestroy): Block and unblock input.
author Karl Heuer <kwzh@gnu.org>
date Thu, 01 Jun 1995 23:37:20 +0000
parents 81f2806578ed
children 06ef0aabc2bb
comparison
equal deleted inserted replaced
12051:f193ce9efe24 12052:942ad27b8e10
25 #include "xterm.h" 25 #include "xterm.h"
26 26
27 #include "frame.h" 27 #include "frame.h"
28 28
29 #include "dispextern.h" 29 #include "dispextern.h"
30 30 #include "blockinput.h"
31 31
32 #include <X11/StringDefs.h> 32 #include <X11/StringDefs.h>
33 #include <X11/IntrinsicP.h> 33 #include <X11/IntrinsicP.h>
34 #include <X11/cursorfont.h> 34 #include <X11/cursorfont.h>
35 #include "widgetprv.h" 35 #include "widgetprv.h"
742 /* this would be called from Fdelete_frame() but it needs to free some 742 /* this would be called from Fdelete_frame() but it needs to free some
743 stuff after the widget has been finalized but before the widget has 743 stuff after the widget has been finalized but before the widget has
744 been freed. */ 744 been freed. */
745 free_frame_faces (s); 745 free_frame_faces (s);
746 746
747 BLOCK_INPUT;
747 /* need to be careful that the face-freeing code doesn't free these too */ 748 /* need to be careful that the face-freeing code doesn't free these too */
748 XFreeGC (XtDisplay (widget), s->display.x->normal_gc); 749 XFreeGC (XtDisplay (widget), s->display.x->normal_gc);
749 XFreeGC (XtDisplay (widget), s->display.x->reverse_gc); 750 XFreeGC (XtDisplay (widget), s->display.x->reverse_gc);
750 XFreeGC (XtDisplay (widget), s->display.x->cursor_gc); 751 XFreeGC (XtDisplay (widget), s->display.x->cursor_gc);
752 UNBLOCK_INPUT;
751 } 753 }
752 754
753 void 755 void
754 EmacsFrameResize (widget) 756 EmacsFrameResize (widget)
755 Widget widget; 757 Widget widget;