From fb3a8d4fb48ee70e19e91c2509c31621f89dec1f Mon Sep 17 00:00:00 2001
From: vincentdarley <vincentdarley>
Date: Wed, 5 Apr 2006 17:25:27 +0000
Subject: fix to compile problems

---
 win/tclWinInit.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/win/tclWinInit.c b/win/tclWinInit.c
index 4703164..93785b7 100644
--- a/win/tclWinInit.c
+++ b/win/tclWinInit.c
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclWinInit.c,v 1.70 2006/04/05 16:32:44 dgp Exp $
+ * RCS: @(#) $Id: tclWinInit.c,v 1.71 2006/04/05 17:25:27 vincentdarley Exp $
  */
 
 #include "tclWinInt.h"
@@ -470,9 +470,9 @@ Tcl_GetEncodingNameFromEnvironment(
     Tcl_DString *bufPtr)
 {
     Tcl_DStringInit(bufPtr);
-    Tcl_DStringSetLength(&bufPtr, 2+TCL_INTEGER_SPACE);
+    Tcl_DStringSetLength(bufPtr, 2+TCL_INTEGER_SPACE);
     wsprintfA(Tcl_DStringValue(bufPtr), "cp%d", GetACP());
-    Tcl_DStringSetLength(&bufPtr, strlen(Tcl_DStringValue(bufPtr)));
+    Tcl_DStringSetLength(bufPtr, strlen(Tcl_DStringValue(bufPtr)));
     return Tcl_DStringValue(bufPtr);
 }
 
-- 
cgit v0.12