summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhobbs <hobbs>2005-02-17 18:34:36 (GMT)
committerhobbs <hobbs>2005-02-17 18:34:36 (GMT)
commit98629c27d8c127efb34d3b0a51b2d314658a112e (patch)
tree11a178e1e82df47ecce1e8d2591f06408e65edf8
parentb4ff3c2539d633872f55f9e907d4df15f2989c3c (diff)
downloadtcl-98629c27d8c127efb34d3b0a51b2d314658a112e.zip
tcl-98629c27d8c127efb34d3b0a51b2d314658a112e.tar.gz
tcl-98629c27d8c127efb34d3b0a51b2d314658a112e.tar.bz2
* win/tclWinFCmd.c (TraverseWinTree): use wcslen on wchar, not
Tcl_UniCharLen.
-rw-r--r--ChangeLog11
-rw-r--r--win/tclWinFCmd.c6
2 files changed, 11 insertions, 6 deletions
diff --git a/ChangeLog b/ChangeLog
index 27cf29a..c5e3b6e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,11 @@
+2005-02-17 Jeff Hobbs <jeffh@ActiveState.com>
+
+ * win/tclWinFCmd.c (TraverseWinTree): use wcslen on wchar, not
+ Tcl_UniCharLen.
+
2005-02-16 Miguel Sofer <msofer@users.sf.net>
- * /doc/variable.n: fix for [Bug 1124160], variables are detected
+ * doc/variable.n: fix for [Bug 1124160], variables are detected
by [info vars] but not by [info locals].
2005-02-11 Jeff Hobbs <jeffh@ActiveState.com>
@@ -62,8 +67,8 @@
2005-02-01 Don Porter <dgp@users.sourceforge.net>
- * generic/tclExecute.c (TclCompEvalObj): Removed stray statement
- left behind in prior code reorganization.
+ * generic/tclExecute.c (TclCompEvalObj): Removed stray statement
+ left behind in prior code reorganization.
2005-01-31 Don Porter <dgp@users.sourceforge.net>
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c
index 1821f8f..249b051 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.43 2004/10/06 16:37:18 dgp Exp $
+ * RCS: @(#) $Id: tclWinFCmd.c,v 1.44 2005/02/17 18:34:36 hobbs Exp $
*/
#include "tclWinInt.h"
@@ -1331,7 +1331,7 @@ TraverseWinTree(
}
}
nativeName = (TCHAR *) data.w.cFileName;
- len = Tcl_UniCharLen(data.w.cFileName) * sizeof(WCHAR);
+ len = wcslen(data.w.cFileName) * sizeof(WCHAR);
} else {
if ((strcmp(data.a.cFileName, ".") == 0)
|| (strcmp(data.a.cFileName, "..") == 0)) {
@@ -1396,7 +1396,7 @@ TraverseWinTree(
}
result = TCL_ERROR;
}
-
+
return result;
}