diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-02-14 11:39:35 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-02-14 11:39:35 (GMT) |
| commit | a750ed2c2475387ab61073159ebf455c2452c78e (patch) | |
| tree | 68ee7979ad03c9d6f612321441afa37078d33317 /generic/tclIO.c | |
| parent | 85320f8fd074a2a55f76a7c0a8290f0a195530dc (diff) | |
| download | tcl-a750ed2c2475387ab61073159ebf455c2452c78e.zip tcl-a750ed2c2475387ab61073159ebf455c2452c78e.tar.gz tcl-a750ed2c2475387ab61073159ebf455c2452c78e.tar.bz2 | |
Fix uniqueness parsing fconfigure -encoding / -encodingprofile options
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 49f4257..8a6f76a 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -7994,7 +7994,7 @@ Tcl_GetChannelOption( return TCL_OK; } } - if (len == 0 || HaveOpt(2, "-encoding")) { + if (len == 0 || HaveOpt(8, "-encoding")) { if (len == 0) { Tcl_DStringAppendElement(dsPtr, "-encoding"); } @@ -8008,7 +8008,7 @@ Tcl_GetChannelOption( return TCL_OK; } } - if (len == 0 || HaveOpt(1, "-encodingprofile")) { + if (len == 0 || HaveOpt(9, "-encodingprofile")) { int profile; const char *profileName; if (len == 0) { |