From dbe18af9ea851bd0e954036eff3fcd21bccf5291 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Mon, 18 Dec 2017 14:33:11 +0000
Subject: No need any more to check for "Windows NT" here, since the minimum is
 XP now.

---
 library/init.tcl | 5 +----
 1 file changed, 1 insertion(+), 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} {
-- 
cgit v0.12