summaryrefslogtreecommitdiffstats
path: root/generic/tclIOCmd.c
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2023-12-05 13:44:15 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2023-12-05 13:44:15 (GMT)
commit85e3751c642a33bb65b2fa23fb103961fa2436c3 (patch)
tree2a176a31eaa8b673d640a83629cb7829178ba425 /generic/tclIOCmd.c
parentb844b819dc474968b15fb4c891ded3fd57ea1184 (diff)
downloadtcl-85e3751c642a33bb65b2fa23fb103961fa2436c3.zip
tcl-85e3751c642a33bb65b2fa23fb103961fa2436c3.tar.gz
tcl-85e3751c642a33bb65b2fa23fb103961fa2436c3.tar.bz2
Proposed fix for [0f1ddc0df7].
Diffstat (limited to 'generic/tclIOCmd.c')
-rw-r--r--generic/tclIOCmd.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/generic/tclIOCmd.c b/generic/tclIOCmd.c
index b6fd799..40cf074 100644
--- a/generic/tclIOCmd.c
+++ b/generic/tclIOCmd.c
@@ -944,6 +944,11 @@ Tcl_ExecObjCmd(
return TCL_ERROR;
}
+ /* Bug [0f1ddc0df7] - encoding errors - use replace profile */
+ if (Tcl_SetChannelOption(NULL, chan, "-profile", "replace") != TCL_OK) {
+ return TCL_ERROR;
+ }
+
if (background) {
/*
* Store the list of PIDs from the pipeline in interp's result and