merged, re-fixed windows get_pwd.

This commit is contained in:
Jason DeBettencourt
2021-03-14 12:07:03 -04:00
parent c3e4c13784
commit 6f3d099498
2 changed files with 2 additions and 2 deletions

View File

@@ -56,7 +56,7 @@ for {set ii 0} {$ii < 10} {incr ii} {
set comSpec {C:\Windows\system32\cmd.exe} set comSpec {C:\Windows\system32\cmd.exe}
} }
return [string map [list \\ /] \ return [string map [list \\ /] \
[string trim [exec -- $comSpec /c echo %CD%]]] [string trim [exec -- $comSpec /c echo cd ]]]
} else { } else {
return [pwd] return [pwd]
} }

View File

@@ -181,7 +181,7 @@ proc get_pwd {} {
set comSpec {C:\Windows\system32\cmd.exe} set comSpec {C:\Windows\system32\cmd.exe}
} }
return [string map [list \\ /] \ return [string map [list \\ /] \
[string trim [exec -- $comSpec /c echo %CD%]]] [string trim [exec -- $comSpec /c echo cd ]]]
} else { } else {
return [pwd] return [pwd]
} }