aboutsummaryrefslogtreecommitdiff
path: root/stdlib.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib.tcl')
-rw-r--r--stdlib.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib.tcl b/stdlib.tcl
index 3abeb3e..caacc00 100644
--- a/stdlib.tcl
+++ b/stdlib.tcl
@@ -105,7 +105,7 @@ proc {info nameofexecutable} {} {
return [file join [pwd] $::jim_argv0]
}
foreach path [split [env PATH ""] $::tcl_platform(pathSeparator)] {
- set exec [file join [pwd] $path $::jim_argv0]
+ set exec [file join [pwd] [string map {\\ /} $path] $::jim_argv0]
if {[file executable $exec]} {
return $exec
}