From 2946fc51c092d08c68f0098963d9fe706b08ed94 Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Thu, 13 Sep 2012 08:14:03 +0000
Subject: [Bug 3567283]: Added missing cast.

---
 ChangeLog     | 4 ++++
 win/tkWinWm.c | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 6f25d61..cdc5ca4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2012-09-13  Donal K. Fellows  <dkf@users.sf.net>
+
+	* win/tkWinWm.c (WmTransientCmd): [Bug 3567283]: Added missing cast.
+
 2012-09-11  Donal K. Fellows  <dkf@users.sf.net>
 
 	* generic/ttk/ttkEntry.c (EntryDisplay): [Bug 3566594]: Must manually
diff --git a/win/tkWinWm.c b/win/tkWinWm.c
index efed842..e353813 100644
--- a/win/tkWinWm.c
+++ b/win/tkWinWm.c
@@ -5526,7 +5526,7 @@ WmTransientCmd(
     }
     if (objc == 3) {
 	if (masterPtr != NULL) {
-	    Tcl_SetObjResult(interp, TkNewWindowObj(masterPtr));
+	    Tcl_SetObjResult(interp, TkNewWindowObj((Tk_Window) masterPtr));
 	}
 	return TCL_OK;
     }
-- 
cgit v0.12