summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-09-14 08:59:41 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-09-14 08:59:41 (GMT)
commitdc8a74cb4dd9032147ee2106fb16a738e394bc1f (patch)
tree6e4dd2286a78cbbeb0b4088b0eac6f9a7f4b7694
parentb1264cd184de3c9ba370ae1e9cb9bb029b12872b (diff)
downloadtcl-dc8a74cb4dd9032147ee2106fb16a738e394bc1f.zip
tcl-dc8a74cb4dd9032147ee2106fb16a738e394bc1f.tar.gz
tcl-dc8a74cb4dd9032147ee2106fb16a738e394bc1f.tar.bz2
Hm, this check doesn't really add anything.
-rw-r--r--generic/tclBinary.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c
index 98a4d31..69f5baf 100644
--- a/generic/tclBinary.c
+++ b/generic/tclBinary.c
@@ -2614,12 +2614,6 @@ BinaryEncodeUu(
break;
case OPT_WRAPCHAR:
wrapchar = Tcl_GetStringFromObj(objv[i+1], &wrapcharlen);
- if (wrapcharlen < 0 || wrapcharlen > 2) {
- Tcl_SetResult(interp, "wrap char out of range", TCL_STATIC);
- Tcl_SetErrorCode(interp, "TCL", "BINARY", "ENCODE",
- "WRAP_CHAR", NULL);
- return TCL_ERROR;
- }
break;
}
}