diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 11:44:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 11:44:49 (GMT) |
| commit | b2c080e9ae2d44b453f81bae6443f6fffaf6b052 (patch) | |
| tree | 96c798290148ac7d237058f68a1f177fe222b7b6 /generic/tclCmdAH.c | |
| parent | 6e8238944201c02321c9c5fc20a4d95c4f5383c8 (diff) | |
| parent | a107ac202e6c6806a0690e555b1141f2d032fb41 (diff) | |
| download | tcl-b2c080e9ae2d44b453f81bae6443f6fffaf6b052.zip tcl-b2c080e9ae2d44b453f81bae6443f6fffaf6b052.tar.gz tcl-b2c080e9ae2d44b453f81bae6443f6fffaf6b052.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclCmdAH.c')
| -rw-r--r-- | generic/tclCmdAH.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c index e29fed7..6a87582 100644 --- a/generic/tclCmdAH.c +++ b/generic/tclCmdAH.c @@ -1794,7 +1794,7 @@ FileAttrIsOwnedCmd( Tcl_Obj *normPathPtr = Tcl_FSGetNormalizedPath(interp, objv[1]); /* Note normPathPtr owned by Tcl, no need to free it */ if (normPathPtr) { - if (TclIsZipfsPath(Tcl_GetString(normPathPtr))) { + if (TclIsZipfsPath(TclGetString(normPathPtr))) { return CheckAccess(interp, objv[1], F_OK); } /* Not zipfs, try native. */ |