diff options
| author | ashok <ashok> | 2017-01-28 06:38:22 (GMT) |
|---|---|---|
| committer | ashok <ashok> | 2017-01-28 06:38:22 (GMT) |
| commit | 1c6496c269fc6be350eae56e9b2351ce6e7e6dac (patch) | |
| tree | df4064dc5209771cb2ffc6ccbc13f5070d6539ff | |
| parent | 368a29cbf01f4aa930631726ce71aafe9c853f12 (diff) | |
| download | tcl-1c6496c269fc6be350eae56e9b2351ce6e7e6dac.zip tcl-1c6496c269fc6be350eae56e9b2351ce6e7e6dac.tar.gz tcl-1c6496c269fc6be350eae56e9b2351ce6e7e6dac.tar.bz2 | |
Added assoc, ftype and move as auto_execok shell built-ins on Windows.
| -rw-r--r-- | library/init.tcl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/library/init.tcl b/library/init.tcl index 544ea77..5a9e87c 100644 --- a/library/init.tcl +++ b/library/init.tcl @@ -636,8 +636,9 @@ proc auto_execok name { } set auto_execs($name) "" - set shellBuiltins [list cls copy date del dir echo erase md mkdir \ - mklink rd ren rename rmdir start time type ver vol] + set shellBuiltins [list assoc cls copy date del dir echo erase ftype \ + md mkdir mklink move rd ren rename rmdir start \ + time type ver vol] if {[info exists env(PATHEXT)]} { # Add an initial ; to have the {} extension check first. set execExtensions [split ";$env(PATHEXT)" ";"] |