summaryrefslogtreecommitdiffstats
path: root/win/tclWinChan.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-05-31 07:16:04 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-05-31 07:16:04 (GMT)
commit28c9edc49b51e1d750ff76ecf44efc388827f1f5 (patch)
tree839085c5e5731166d22df9c9ede86f85f2006c8f /win/tclWinChan.c
parenta4f289d5b5a7e9f55955463e03ed4140b324d1c6 (diff)
parent614c8b3360d596c46d27b40e19a52698b3506c8c (diff)
downloadtcl-28c9edc49b51e1d750ff76ecf44efc388827f1f5.zip
tcl-28c9edc49b51e1d750ff76ecf44efc388827f1f5.tar.gz
tcl-28c9edc49b51e1d750ff76ecf44efc388827f1f5.tar.bz2
Fix [c243e7a85e]: TIP #603 implementation broken on Windows
Diffstat (limited to 'win/tclWinChan.c')
-rw-r--r--win/tclWinChan.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/win/tclWinChan.c b/win/tclWinChan.c
index 545aa2d..0fc7455 100644
--- a/win/tclWinChan.c
+++ b/win/tclWinChan.c
@@ -1004,10 +1004,6 @@ FileGetOptionProc(
*/
if ((len > 1) && (strncmp(optionName, "-stat", len) == 0)) {
- return TCL_OK;
- }
-
- if (valid) {
Tcl_Obj *dictObj = StatOpenFile(infoPtr);
const char *dictContents;
Tcl_Size dictLength;
@@ -1030,6 +1026,10 @@ FileGetOptionProc(
Tcl_DecrRefCount(dictObj);
return TCL_OK;
}
+
+ if (valid) {
+ return TCL_OK;
+ }
return Tcl_BadChannelOption(interp, optionName,
"stat");
}