From bb14668196d111007a3e14e5ab302c56871bc2e6 Mon Sep 17 00:00:00 2001
From: nijtmans <nijtmans>
Date: Tue, 16 Dec 2008 23:53:14 +0000
Subject: remove unused variables

---
 ChangeLog         | 4 ++++
 win/tkWinDialog.c | 6 ++----
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index a5216c0..b84cf95 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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);
 
-- 
cgit v0.12