diff --git a/src/make.tcl b/src/make.tcl index b17de3e9..0fd79ad3 100644 --- a/src/make.tcl +++ b/src/make.tcl @@ -2454,7 +2454,7 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder} { if {$::tcl_platform(platform) eq "windows"} { exec cmd /c copy [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY.exe } else { - exec cp [info nameofexecutable] $rtfolder/[info nameofexecutable]_BUILDCOPY + exec cp [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY } } @@ -2683,7 +2683,7 @@ foreach runtimefile $runtimes { #assume it's a mounted tclkit (because tcl kits mount in same place as their underlying path and mask the executable) #use the BUILDCOPY created above - REVIEW if {$::tcl_platform(platform) eq "windows"} { - set useruntime [file rootname [file tail $runtimefile]]_BUILDCOPY.exe + set useruntime [file tail $runtimefile]_BUILDCOPY.exe } else { set useruntime ${runtimefile}_BUILDCOPY } diff --git a/src/project_layouts/custom/_project/punk.basic/src/make.tcl b/src/project_layouts/custom/_project/punk.basic/src/make.tcl index b17de3e9..0fd79ad3 100644 --- a/src/project_layouts/custom/_project/punk.basic/src/make.tcl +++ b/src/project_layouts/custom/_project/punk.basic/src/make.tcl @@ -2454,7 +2454,7 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder} { if {$::tcl_platform(platform) eq "windows"} { exec cmd /c copy [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY.exe } else { - exec cp [info nameofexecutable] $rtfolder/[info nameofexecutable]_BUILDCOPY + exec cp [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY } } @@ -2683,7 +2683,7 @@ foreach runtimefile $runtimes { #assume it's a mounted tclkit (because tcl kits mount in same place as their underlying path and mask the executable) #use the BUILDCOPY created above - REVIEW if {$::tcl_platform(platform) eq "windows"} { - set useruntime [file rootname [file tail $runtimefile]]_BUILDCOPY.exe + set useruntime [file tail $runtimefile]_BUILDCOPY.exe } else { set useruntime ${runtimefile}_BUILDCOPY } diff --git a/src/project_layouts/custom/_project/punk.project-0.1/src/make.tcl b/src/project_layouts/custom/_project/punk.project-0.1/src/make.tcl index b17de3e9..0fd79ad3 100644 --- a/src/project_layouts/custom/_project/punk.project-0.1/src/make.tcl +++ b/src/project_layouts/custom/_project/punk.project-0.1/src/make.tcl @@ -2454,7 +2454,7 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder} { if {$::tcl_platform(platform) eq "windows"} { exec cmd /c copy [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY.exe } else { - exec cp [info nameofexecutable] $rtfolder/[info nameofexecutable]_BUILDCOPY + exec cp [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY } } @@ -2683,7 +2683,7 @@ foreach runtimefile $runtimes { #assume it's a mounted tclkit (because tcl kits mount in same place as their underlying path and mask the executable) #use the BUILDCOPY created above - REVIEW if {$::tcl_platform(platform) eq "windows"} { - set useruntime [file rootname [file tail $runtimefile]]_BUILDCOPY.exe + set useruntime [file tail $runtimefile]_BUILDCOPY.exe } else { set useruntime ${runtimefile}_BUILDCOPY } diff --git a/src/project_layouts/custom/_project/punk.shell-0.1/src/make.tcl b/src/project_layouts/custom/_project/punk.shell-0.1/src/make.tcl index b17de3e9..0fd79ad3 100644 --- a/src/project_layouts/custom/_project/punk.shell-0.1/src/make.tcl +++ b/src/project_layouts/custom/_project/punk.shell-0.1/src/make.tcl @@ -2454,7 +2454,7 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder} { if {$::tcl_platform(platform) eq "windows"} { exec cmd /c copy [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY.exe } else { - exec cp [info nameofexecutable] $rtfolder/[info nameofexecutable]_BUILDCOPY + exec cp [info nameofexecutable] $rtfolder/[file rootname [info nameofexecutable]]_BUILDCOPY } } @@ -2683,7 +2683,7 @@ foreach runtimefile $runtimes { #assume it's a mounted tclkit (because tcl kits mount in same place as their underlying path and mask the executable) #use the BUILDCOPY created above - REVIEW if {$::tcl_platform(platform) eq "windows"} { - set useruntime [file rootname [file tail $runtimefile]]_BUILDCOPY.exe + set useruntime [file tail $runtimefile]_BUILDCOPY.exe } else { set useruntime ${runtimefile}_BUILDCOPY }