diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-12-18 14:33:11 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-12-18 14:33:11 (GMT) |
| commit | dbe18af9ea851bd0e954036eff3fcd21bccf5291 (patch) | |
| tree | cf2960e7bd54b40d50322b137d7d0b08d941f86d /library/init.tcl | |
| parent | 52dc6e55e5abe3b9404010f44ba4626b9366e534 (diff) | |
| download | tcl-dbe18af9ea851bd0e954036eff3fcd21bccf5291.zip tcl-dbe18af9ea851bd0e954036eff3fcd21bccf5291.tar.gz tcl-dbe18af9ea851bd0e954036eff3fcd21bccf5291.tar.bz2 | |
No need any more to check for "Windows NT" here, since the minimum is XP now.
Diffstat (limited to 'library/init.tcl')
| -rw-r--r-- | library/init.tcl | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/library/init.tcl b/library/init.tcl index 794b68b..530ce58 100644 --- a/library/init.tcl +++ b/library/init.tcl @@ -653,10 +653,7 @@ proc auto_execok name { set windir $env(WINDIR) } if {[info exists windir]} { - if {$tcl_platform(os) eq "Windows NT"} { - append path "$windir/system32;" - } - append path "$windir/system;$windir;" + append path "$windir/system32;$windir/system;$windir;" } foreach var {PATH Path path} { |