From 65eb91e24d86d9e7ad1bd55dec69b13e1c28b1d0 Mon Sep 17 00:00:00 2001
From: hobbs <hobbs>
Date: Fri, 28 Dec 2001 23:09:12 +0000
Subject: win/tkWinInit.c (TkpDisplayWarning): added Tcl_DStringFrees

---
 win/tkWinInit.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/win/tkWinInit.c b/win/tkWinInit.c
index f071eef..eb87599 100644
--- a/win/tkWinInit.c
+++ b/win/tkWinInit.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tkWinInit.c,v 1.5 2001/12/28 02:14:41 hobbs Exp $
+ * RCS: @(#) $Id: tkWinInit.c,v 1.6 2001/12/28 23:09:12 hobbs Exp $
  */
 
 #include "tkWinInt.h"
@@ -131,4 +131,6 @@ TkpDisplayWarning(msg, title)
 	    (WCHAR *) Tcl_DStringValue(&titleString),
 	    MB_OK | MB_ICONEXCLAMATION | MB_SYSTEMMODAL
 	    | MB_SETFOREGROUND | MB_TOPMOST);
+    Tcl_DStringFree(&msgString);
+    Tcl_DStringFree(&titleString);
 }
-- 
cgit v0.12