summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorvincentdarley <vincentdarley>2006-04-05 17:25:27 (GMT)
committervincentdarley <vincentdarley>2006-04-05 17:25:27 (GMT)
commitfb3a8d4fb48ee70e19e91c2509c31621f89dec1f (patch)
tree9ecbbcba64524e71e431712273129ed59976c76e
parentaaa1189113f81fcab92db0bee35e77a0ef03e5d9 (diff)
downloadtcl-fb3a8d4fb48ee70e19e91c2509c31621f89dec1f.zip
tcl-fb3a8d4fb48ee70e19e91c2509c31621f89dec1f.tar.gz
tcl-fb3a8d4fb48ee70e19e91c2509c31621f89dec1f.tar.bz2
fix to compile problems
-rw-r--r--win/tclWinInit.c6
1 files 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);
}