diff options
| author | nijtmans <nijtmans> | 2010-02-15 22:56:19 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-02-15 22:56:19 (GMT) |
| commit | d51db74e5f9c0be32cbd0cfeeff0797a74cfd4ba (patch) | |
| tree | 140d3d78d10e4ec6405c364f7a6936a7a07086a5 /win/tclWinFCmd.c | |
| parent | a0d1a202239c64ab548f9d515bba530fb475d743 (diff) | |
| download | tcl-d51db74e5f9c0be32cbd0cfeeff0797a74cfd4ba.zip tcl-d51db74e5f9c0be32cbd0cfeeff0797a74cfd4ba.tar.gz tcl-d51db74e5f9c0be32cbd0cfeeff0797a74cfd4ba.tar.bz2 | |
reverted earlier rename from tcl*Stubs to
tcl*ConstStubs, it's not necessary at all.
tclEnsemble.c: Fix signed-unsigned mismatch
make tclWinProcs "const"
Add first part of mslu support,
See [Feature Request #2819611]
Diffstat (limited to 'win/tclWinFCmd.c')
| -rw-r--r-- | win/tclWinFCmd.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c index 6f5cd8d..67ba3eb 100644 --- a/win/tclWinFCmd.c +++ b/win/tclWinFCmd.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: tclWinFCmd.c,v 1.58 2009/08/02 10:41:09 nijtmans Exp $ + * RCS: @(#) $Id: tclWinFCmd.c,v 1.59 2010/02/15 22:56:19 nijtmans Exp $ */ #include "tclWinInt.h" @@ -930,8 +930,8 @@ TclpObjCopyDirectory( return TCL_ERROR; } - Tcl_WinUtfToTChar(Tcl_GetString(normSrcPtr), -1, &srcString); - Tcl_WinUtfToTChar(Tcl_GetString(normDestPtr), -1, &dstString); + tclWinProcs->utf2tchar(Tcl_GetString(normSrcPtr), -1, &srcString); + tclWinProcs->utf2tchar(Tcl_GetString(normDestPtr), -1, &dstString); ret = TraverseWinTree(TraversalCopy, &srcString, &dstString, &ds); @@ -1003,7 +1003,7 @@ TclpObjRemoveDirectory( if (normPtr == NULL) { return TCL_ERROR; } - Tcl_WinUtfToTChar(Tcl_GetString(normPtr), -1, &native); + tclWinProcs->utf2tchar(Tcl_GetString(normPtr), -1, &native); ret = DoRemoveDirectory(&native, recursive, &ds); Tcl_DStringFree(&native); } else { @@ -1720,7 +1720,7 @@ ConvertFileNameFormat( Tcl_Obj *tempPath; Tcl_DString ds; Tcl_DString dsTemp; - TCHAR *nativeName; + const TCHAR *nativeName; const char *tempString; int tempLen; WIN32_FIND_DATAT data; @@ -1737,7 +1737,7 @@ ConvertFileNameFormat( Tcl_DStringInit(&ds); tempString = Tcl_GetStringFromObj(tempPath,&tempLen); - nativeName = Tcl_WinUtfToTChar(tempString, tempLen, &ds); + nativeName = tclWinProcs->utf2tchar(tempString, tempLen, &ds); Tcl_DecrRefCount(tempPath); handle = tclWinProcs->findFirstFileProc(nativeName, &data); if (handle == INVALID_HANDLE_VALUE) { |