diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-03-06 21:40:49 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-03-06 21:40:49 (GMT) |
| commit | a083ddc8208f8e9f625ef92db90f941262a260a6 (patch) | |
| tree | 1e5dfeeb51ead4be18b7b7c5b8ea728553409480 /generic/tclCmdMZ.c | |
| parent | 030be92318aa1d4b37a84fae9614fe5a77f890ba (diff) | |
| download | tcl-a083ddc8208f8e9f625ef92db90f941262a260a6.zip tcl-a083ddc8208f8e9f625ef92db90f941262a260a6.tar.gz tcl-a083ddc8208f8e9f625ef92db90f941262a260a6.tar.bz2 | |
* generic/tclBasic.c: More replacements of Tcl_UtfBackslash() calls
* generic/tclCmdMZ.c: with TclParseBackslash() where possible.
* generic/tclCompExpr.c:
* generic/tclCompile.c:
* generic/tclUtil.c:
Diffstat (limited to 'generic/tclCmdMZ.c')
| -rw-r--r-- | generic/tclCmdMZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index fe8366c..ccf3bc6 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -2597,7 +2597,7 @@ Tcl_SubstObj(interp, objPtr, flags) Tcl_AppendToObj(resultObj, old, p-old); } Tcl_AppendToObj(resultObj, buf, - Tcl_UtfBackslash(p, &count, buf)); + TclParseBackslash(p, length, &count, buf)); p += count; length -= count; old = p; } else { |