Commit aabaed09 authored by JasonTashtego's avatar JasonTashtego
Browse files

get_pwd fix for windows

parent bfeff026
......@@ -175,7 +175,7 @@ proc get_pwd {} {
# defeat the purpose of this procedure.
#
return [string map [list \\ /] \
[string trim [exec -- $::env(ComSpec) /c echo %CD%]]]
[string trim [exec -- $::env(ComSpec) /c cd ]]]
} else {
return [pwd]
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment