diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2022-08-30 09:40:35 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2022-08-30 09:40:35 (GMT) |
| commit | 74f8d5493bfe3936ae043a8bea5478decf86a33b (patch) | |
| tree | 045fa626729ede4e6210f0d1db730861fff7d678 /generic/tclCmdAH.c | |
| parent | 3ed0b91895a63334fd8507181676be78a60efb0f (diff) | |
| download | tcl-74f8d5493bfe3936ae043a8bea5478decf86a33b.zip tcl-74f8d5493bfe3936ae043a8bea5478decf86a33b.tar.gz tcl-74f8d5493bfe3936ae043a8bea5478decf86a33b.tar.bz2 | |
Backport TIP 602 tildeexpand
Diffstat (limited to 'generic/tclCmdAH.c')
| -rw-r--r-- | generic/tclCmdAH.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c index 62c799a..06919a2 100644 --- a/generic/tclCmdAH.c +++ b/generic/tclCmdAH.c @@ -1191,7 +1191,7 @@ TclInitFileCmd( {"executable", FileAttrIsExecutableCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"exists", FileAttrIsExistingCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"extension", PathExtensionCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, - {"home", TclFileHomeCmd, TclCompileBasic0Or1ArgCmd, NULL, NULL, 0}, + {"home", TclFileHomeCmd, TclCompileBasic0Or1ArgCmd, NULL, NULL, 1}, {"isdirectory", FileAttrIsDirectoryCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"isfile", FileAttrIsFileCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"join", PathJoinCmd, TclCompileBasicMin1ArgCmd, NULL, NULL, 0}, @@ -1215,6 +1215,7 @@ TclInitFileCmd( {"tail", PathTailCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"tempdir", TclFileTempDirCmd, TclCompileBasic0Or1ArgCmd, NULL, NULL, 1}, {"tempfile", TclFileTemporaryCmd, TclCompileBasic0To2ArgCmd, NULL, NULL, 1}, + {"tildeexpand", TclFileTildeExpandCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"type", FileAttrTypeCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, {"volumes", FilesystemVolumesCmd, TclCompileBasic0ArgCmd, NULL, NULL, 1}, {"writable", FileAttrIsWritableCmd, TclCompileBasic1ArgCmd, NULL, NULL, 1}, |