diff options
| author | nijtmans <nijtmans> | 2010-03-12 13:12:35 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-03-12 13:12:35 (GMT) |
| commit | 9d8a0339110e68547c1ee6d8c1020f1bf9fed96a (patch) | |
| tree | cb2fadc8328ffcba901ac53556ba46ae26bb6274 /win/tkWinTest.c | |
| parent | 3ed639bf6e8ceec216565d2580fb02b26c5e7295 (diff) | |
| download | tk-9d8a0339110e68547c1ee6d8c1020f1bf9fed96a.zip tk-9d8a0339110e68547c1ee6d8c1020f1bf9fed96a.tar.gz tk-9d8a0339110e68547c1ee6d8c1020f1bf9fed96a.tar.bz2 | |
[Bug 2956548] TkpButtonSetDefaults only initializes one button type
Fix 2 minor gcc warnings in tkWinTest.c
Diffstat (limited to 'win/tkWinTest.c')
| -rw-r--r-- | win/tkWinTest.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/win/tkWinTest.c b/win/tkWinTest.c index c02a036..843825d 100644 --- a/win/tkWinTest.c +++ b/win/tkWinTest.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinTest.c,v 1.7 2002/08/14 15:31:21 vincentdarley Exp $ + * RCS: @(#) $Id: tkWinTest.c,v 1.7.2.1 2010/03/12 13:12:35 nijtmans Exp $ */ #include "tkWinInt.h" @@ -171,7 +171,6 @@ TestclipboardObjCmd(clientData, interp, objc, objv) int objc; /* Number of arguments. */ Tcl_Obj *CONST objv[]; /* Argument values. */ { - TkWindow *winPtr = (TkWindow *) clientData; HGLOBAL handle; char *data; int code = TCL_OK; @@ -334,7 +333,7 @@ TestwineventCmd(clientData, interp, argc, argv) char buf[TCL_INTEGER_SPACE]; sprintf(buf, "%d", - SendDlgItemMessage(hwnd, id, message, wParam, lParam)); + (int) SendDlgItemMessage(hwnd, id, message, wParam, lParam)); Tcl_SetResult(interp, buf, TCL_VOLATILE); break; } |