Mercurial > hg > xemacs-beta

comparison src/EmacsShell-sub.c @ 165:5a88923fcbfe r20-3b9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b9
author cvs
date Mon, 13 Aug 2007 09:44:42 +0200
parents 54cc21c15cbb
children 3d6bfa290dbd
comparison
equal deleted inserted replaced
164:4e0740e5aab2 165:5a88923fcbfe
230 update_size_hints_internal (EMACS_SHELL_WIDGET w, 230 update_size_hints_internal (EMACS_SHELL_WIDGET w,
231 int width, int height) 231 int width, int height)
232 { 232 {
233 int base_width, base_height; 233 int base_width, base_height;
234 int cell_width, cell_height; 234 int cell_width, cell_height;
235 Arg al [10];
235 236
236 /* time to update them thar size hints */ 237 /* time to update them thar size hints */
237 cell_width = w->wm.size_hints.width_inc; 238 cell_width = w->wm.size_hints.width_inc;
238 cell_height = w->wm.size_hints.height_inc; 239 cell_height = w->wm.size_hints.height_inc;
239 base_width = width - cell_width * w->emacs_shell.width_cells; 240 base_width = width - cell_width * w->emacs_shell.width_cells;
248 printf (" text area size in cells: %d %d\n", w->emacs_shell.width_cells, 249 printf (" text area size in cells: %d %d\n", w->emacs_shell.width_cells,
249 w->emacs_shell.height_cells); 250 w->emacs_shell.height_cells);
250 printf (" base size set to: %d %d\n", base_width, base_height); 251 printf (" base size set to: %d %d\n", base_width, base_height);
251 fflush (stdout); 252 fflush (stdout);
252 #endif 253 #endif
253 XtVaSetValues ((Widget) w, 254 XtSetArg(al [0], XtNbaseWidth, base_width);
254 XtNbaseWidth, base_width, 255 XtSetArg(al [1], XtNbaseHeight, base_height);
255 XtNbaseHeight, base_height, 256 XtSetArg(al [2], XtNminWidth, base_width +
256 XtNminWidth, base_width + 257 cell_width * w->emacs_shell.min_width_cells);
257 cell_width * w->emacs_shell.min_width_cells, 258 XtSetArg(al [3], XtNminHeight, base_height +
258 XtNminHeight, base_height + 259 cell_height * w->emacs_shell.min_height_cells);
259 cell_height * w->emacs_shell.min_height_cells, 260 XtSetValues ((Widget) w, al, 4);
260 NULL);
261 } 261 }
262 262
263 static XtGeometryResult 263 static XtGeometryResult
264 SuperClassRootGeometryManager (Widget gw, 264 SuperClassRootGeometryManager (Widget gw,
265 XtWidgetGeometry *request, 265 XtWidgetGeometry *request,