diff options
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 4ab746c..cec6ad3 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -1734,11 +1734,6 @@ Tcl_FSEvalFileEx( Tcl_CloseEx(interp,chan,0); return result; } - if (Tcl_SetChannelOption(interp, chan, "-profile", "strict") - != TCL_OK) { - Tcl_CloseEx(interp,chan,0); - return result; - } TclNewObj(objPtr); Tcl_IncrRefCount(objPtr); |