diff options
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. */ |