mirror of
https://github.com/glebarez/go-sqlite.git
synced 2025-10-06 00:06:56 +08:00
cleanup get working dir on windows: "echo /c %CD%" -> "/c cd "
This commit is contained in:
2
testdata/tcl/crash5.test
vendored
2
testdata/tcl/crash5.test
vendored
@@ -50,7 +50,7 @@ for {set ii 0} {$ii < 10} {incr ii} {
|
|||||||
proc get_pwd {} {
|
proc get_pwd {} {
|
||||||
if {$::tcl_platform(platform) eq "windows"} {
|
if {$::tcl_platform(platform) eq "windows"} {
|
||||||
return [string map [list \\ /] \
|
return [string map [list \\ /] \
|
||||||
[string trim [exec -- $::env(ComSpec) /c echo %CD%]]]
|
[string trim [exec -- $::env(ComSpec) /c cd ]]]
|
||||||
} else {
|
} else {
|
||||||
return [pwd]
|
return [pwd]
|
||||||
}
|
}
|
||||||
|
Reference in New Issue
Block a user