diff options
author | nijtmans <nijtmans> | 2008-12-16 23:53:14 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2008-12-16 23:53:14 (GMT) |
commit | bb14668196d111007a3e14e5ab302c56871bc2e6 (patch) | |
tree | 42e3c393b80a28b6bc34da85323e573a34d39664 | |
parent | 507e51d792da2565608e561d9970c8527b64385c (diff) | |
download | tk-bb14668196d111007a3e14e5ab302c56871bc2e6.zip tk-bb14668196d111007a3e14e5ab302c56871bc2e6.tar.gz tk-bb14668196d111007a3e14e5ab302c56871bc2e6.tar.bz2 |
remove unused variables
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | win/tkWinDialog.c | 6 |
2 files changed, 6 insertions, 4 deletions
@@ -1,3 +1,7 @@ +2008-12-16 Jan Nijtmans <nijtmans@users.sf.net> + + * win/tkWinDialog.c: remove unused variables + 2008-12-15 Don Porter <dgp@users.sourceforge.net> TIP #338 IMPLEMENTATION diff --git a/win/tkWinDialog.c b/win/tkWinDialog.c index fd77b10..fd0942b 100644 --- a/win/tkWinDialog.c +++ b/win/tkWinDialog.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinDialog.c,v 1.58 2008/12/10 13:41:19 patthoyts Exp $ + * RCS: @(#) $Id: tkWinDialog.c,v 1.59 2008/12/16 23:53:14 nijtmans Exp $ * */ @@ -2326,7 +2326,7 @@ static Tcl_Obj * GetFontObj(HDC hdc, LOGFONT *plf) { Tcl_Obj *resObj; - int len = 0, pt = 0; + int pt = 0; resObj = Tcl_NewListObj(0, NULL); Tcl_ListObjAppendElement(NULL, resObj, @@ -2441,7 +2441,6 @@ HookProc(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam) */ if (WM_COMMAND == msg && LOWORD(wParam) == 1026) { LOGFONT lf = {0}; - int iPt = 0; HDC hdc = GetDC(hwndDlg); SendMessage(hwndDlg, WM_CHOOSEFONT_GETLOGFONT, 0, (LPARAM)&lf); if (phd && phd->cmdObj) { @@ -2680,7 +2679,6 @@ FontchooserShowCmd( HDC hdc; HookData *hdPtr; int r = TCL_OK, oldMode = 0; - Tcl_Obj *resObj = NULL; hdPtr = Tcl_GetAssocData(interp, "::tk::fontchooser", NULL); |