Mercurial > hg > xemacs-beta

comparison src/EmacsShell.c @ 380:8626e4521993 r21-2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-5
author cvs
date Mon, 13 Aug 2007 11:07:10 +0200
parents 54cc21c15cbb
children 6719134a07c2
comparison
equal deleted inserted replaced
379:76b7d63099ad 380:8626e4521993
22 22
23 /* Written by Ben Wing, May, 1994. */ 23 /* Written by Ben Wing, May, 1994. */
24 24
25 #include <config.h> 25 #include <config.h>
26 26
27 #include <stdio.h> 27 #include <assert.h>
28 #include <stdlib.h> 28 #include <stdlib.h>
29 #include <X11/StringDefs.h> 29 #include <X11/StringDefs.h>
30 #include "xintrinsicp.h" 30 #include "xintrinsicp.h"
31 #include <X11/Shell.h> 31 #include <X11/Shell.h>
32 #include <X11/ShellP.h> 32 #include <X11/ShellP.h>
33 #include <X11/Vendor.h>
34 #include <X11/VendorP.h>
35 #include "EmacsShell.h" 33 #include "EmacsShell.h"
36 #include "ExternalShell.h" 34 #include "ExternalShell.h"
37 35
38 #if 0 /* Not currently used */ 36 #if 0 /* Not currently used */
39 37
138 #endif /* 0 */ 136 #endif /* 0 */
139 137
140 void 138 void
141 EmacsShellSmashIconicHint (Widget shell, int iconic_p) 139 EmacsShellSmashIconicHint (Widget shell, int iconic_p)
142 { 140 {
143 /* See comment in xfns.c about this */ 141 /* See comment in frame-x.c about this */
144 WMShellWidget wmshell; 142 WMShellWidget wmshell = (WMShellWidget) shell;
145 int old, new; 143 assert (XtIsSubclass (shell, wmShellWidgetClass));
146 if (! XtIsSubclass (shell, wmShellWidgetClass)) abort (); 144 /* old_state = (wmshell->wm.wm_hints.flags & StateHint
147 wmshell = (WMShellWidget) shell; 145 ? wmshell->wm.wm_hints.initial_state
148 old = (wmshell->wm.wm_hints.flags & StateHint 146 : NormalState); */
149 ? wmshell->wm.wm_hints.initial_state
150 : NormalState);
151 new = (iconic_p ? IconicState : NormalState);
152 wmshell->wm.wm_hints.flags |= StateHint; 147 wmshell->wm.wm_hints.flags |= StateHint;
153 wmshell->wm.wm_hints.initial_state = new; 148 wmshell->wm.wm_hints.initial_state = iconic_p ? IconicState : NormalState;
154 } 149 }
155 150
156 void 151 void
157 EmacsShellUpdateSizeHints (Widget gw) 152 EmacsShellUpdateSizeHints (Widget gw)
158 { 153 {