From 870cac2f8b0662d65d5147efce10829c34677531 Mon Sep 17 00:00:00 2001 From: Julian Noble Date: Sun, 15 Mar 2026 19:22:09 +1100 Subject: [PATCH] fix unix breakage in winlnk --- src/bootsupport/modules/punk/winlnk-0.1.1.tm | 2 +- src/modules/punk/winlnk-999999.0a1.0.tm | 2 +- .../src/bootsupport/modules/punk/winlnk-0.1.1.tm | 2 +- .../punk.shell-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm | 2 +- src/vfs/_vfscommon.vfs/modules/punk/winlnk-0.1.1.tm | 2 +- 5 files changed, 5 insertions(+), 5 deletions(-) diff --git a/src/bootsupport/modules/punk/winlnk-0.1.1.tm b/src/bootsupport/modules/punk/winlnk-0.1.1.tm index 398adfdb..f3a25272 100644 --- a/src/bootsupport/modules/punk/winlnk-0.1.1.tm +++ b/src/bootsupport/modules/punk/winlnk-0.1.1.tm @@ -699,7 +699,7 @@ tcl::namespace::eval punk::winlnk { if {[file exists /mnt/$drive_letter]} { set link_target [file join /mnt/$drive_letter $tail $suffix_path] } else { - if {$drive_letter eq [string tolower $drive_letter]]} { + if {$drive_letter eq [string tolower $drive_letter]} { set op_drive_letter [string toupper $drive_letter] } else { set op_drive_letter [string tolower $drive_letter] diff --git a/src/modules/punk/winlnk-999999.0a1.0.tm b/src/modules/punk/winlnk-999999.0a1.0.tm index c219fc96..862b0476 100644 --- a/src/modules/punk/winlnk-999999.0a1.0.tm +++ b/src/modules/punk/winlnk-999999.0a1.0.tm @@ -699,7 +699,7 @@ tcl::namespace::eval punk::winlnk { if {[file exists /mnt/$drive_letter]} { set link_target [file join /mnt/$drive_letter $tail $suffix_path] } else { - if {$drive_letter eq [string tolower $drive_letter]]} { + if {$drive_letter eq [string tolower $drive_letter]} { set op_drive_letter [string toupper $drive_letter] } else { set op_drive_letter [string tolower $drive_letter] diff --git a/src/project_layouts/custom/_project/punk.project-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm b/src/project_layouts/custom/_project/punk.project-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm index 398adfdb..f3a25272 100644 --- a/src/project_layouts/custom/_project/punk.project-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm +++ b/src/project_layouts/custom/_project/punk.project-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm @@ -699,7 +699,7 @@ tcl::namespace::eval punk::winlnk { if {[file exists /mnt/$drive_letter]} { set link_target [file join /mnt/$drive_letter $tail $suffix_path] } else { - if {$drive_letter eq [string tolower $drive_letter]]} { + if {$drive_letter eq [string tolower $drive_letter]} { set op_drive_letter [string toupper $drive_letter] } else { set op_drive_letter [string tolower $drive_letter] diff --git a/src/project_layouts/custom/_project/punk.shell-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm b/src/project_layouts/custom/_project/punk.shell-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm index 398adfdb..f3a25272 100644 --- a/src/project_layouts/custom/_project/punk.shell-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm +++ b/src/project_layouts/custom/_project/punk.shell-0.1/src/bootsupport/modules/punk/winlnk-0.1.1.tm @@ -699,7 +699,7 @@ tcl::namespace::eval punk::winlnk { if {[file exists /mnt/$drive_letter]} { set link_target [file join /mnt/$drive_letter $tail $suffix_path] } else { - if {$drive_letter eq [string tolower $drive_letter]]} { + if {$drive_letter eq [string tolower $drive_letter]} { set op_drive_letter [string toupper $drive_letter] } else { set op_drive_letter [string tolower $drive_letter] diff --git a/src/vfs/_vfscommon.vfs/modules/punk/winlnk-0.1.1.tm b/src/vfs/_vfscommon.vfs/modules/punk/winlnk-0.1.1.tm index 398adfdb..f3a25272 100644 --- a/src/vfs/_vfscommon.vfs/modules/punk/winlnk-0.1.1.tm +++ b/src/vfs/_vfscommon.vfs/modules/punk/winlnk-0.1.1.tm @@ -699,7 +699,7 @@ tcl::namespace::eval punk::winlnk { if {[file exists /mnt/$drive_letter]} { set link_target [file join /mnt/$drive_letter $tail $suffix_path] } else { - if {$drive_letter eq [string tolower $drive_letter]]} { + if {$drive_letter eq [string tolower $drive_letter]} { set op_drive_letter [string toupper $drive_letter] } else { set op_drive_letter [string tolower $drive_letter]