mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-23 10:34:07 +00:00
Code Issues Releases Activity

(w32_createwindow): If left' and/or top' frame parameters are bound to some

Browse Source 
values, use that instead of CW_USEDEFAULT.
This commit is contained in:
Eli Zaretskii 2006-07-22 11:31:55 +00:00
parent 04437a8fe8
commit 48b62d105b
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/w32fns.c
View File

@ -2066,6 +2066,7 @@ w32_createwindow (f)
{
HWND hwnd;
RECT rect;
Lisp_Object top, left;
rect.left = rect.top = 0;
rect.right = FRAME_PIXEL_WIDTH (f);
@ -2081,12 +2082,17 @@ w32_createwindow (f)
w32_init_class (hinst);
}
/* When called with RES_TYPE_NUMBER, w32_get_arg will return zero
for anything that is not a number and is not Qunbound. */
left = w32_get_arg (Qnil, Qleft, "left", "Left", RES_TYPE_NUMBER);
top = w32_get_arg (Qnil, Qtop, "top", "Top", RES_TYPE_NUMBER);
FRAME_W32_WINDOW (f) = hwnd
= CreateWindow (EMACS_CLASS,
f->namebuf,
f->output_data.w32->dwStyle | WS_CLIPCHILDREN,
CW_USEDEFAULT,
SW_SHOW,
EQ (left, Qunbound) ? CW_USEDEFAULT : XINT (left),
EQ (top, Qunbound) ? CW_USEDEFAULT : XINT (top),
rect.right - rect.left,
rect.bottom - rect.top,
NULL,