diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-03-31 18:56:33 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-03-31 18:56:33 (GMT) |
| commit | 90f77cbdf1770b19c8ef4534cdfeabe298f51c26 (patch) | |
| tree | 1870aac243e3598b95580ab043d219fc32a75706 | |
| parent | 3eb5ddf1da36ed5c046ee03b2c584c86c8582d22 (diff) | |
| download | tcl-90f77cbdf1770b19c8ef4534cdfeabe298f51c26.zip tcl-90f77cbdf1770b19c8ef4534cdfeabe298f51c26.tar.gz tcl-90f77cbdf1770b19c8ef4534cdfeabe298f51c26.tar.bz2 | |
Fix TclCopyChannel() incorrect use of CHANNEL_PROFILE_GET().
| -rw-r--r-- | generic/tclIO.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index bfe0aaf..40d0908 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -9378,8 +9378,10 @@ TclCopyChannel( && inStatePtr->inputTranslation == TCL_TRANSLATE_LF && outStatePtr->outputTranslation == TCL_TRANSLATE_LF && inStatePtr->encoding == outStatePtr->encoding - && CHANNEL_PROFILE_GET(inStatePtr->flags) != TCL_ENCODING_PROFILE_STRICT - && CHANNEL_PROFILE_GET(outStatePtr->flags) == TCL_ENCODING_PROFILE_TCL8; + && CHANNEL_PROFILE_GET(inStatePtr->inputEncodingFlags) != TCL_ENCODING_PROFILE_STRICT + && CHANNEL_PROFILE_GET(inStatePtr->outputEncodingFlags) != TCL_ENCODING_PROFILE_STRICT + && CHANNEL_PROFILE_GET(outStatePtr->inputEncodingFlags) == TCL_ENCODING_PROFILE_TCL8 + && CHANNEL_PROFILE_GET(outStatePtr->outputEncodingFlags) == TCL_ENCODING_PROFILE_TCL8; /* * Allocate a new CopyState to maintain info about the current copy in |