Browse Source

allow fcat to resolve .lnk files even on non-windows platforms

master
Julian Noble 4 days ago
parent
commit
c2c3b6f019
  1. 5
      src/modules/punk/mix/util-999999.0a1.0.tm

5
src/modules/punk/mix/util-999999.0a1.0.tm

@ -107,9 +107,6 @@ namespace eval punk::mix::util {
set opts [dict remove $opts -noredirect] set opts [dict remove $opts -noredirect]
} }
if {$::tcl_platform(platform) ne "windows"} {
return [fileutil::cat {*}$args]
}
set finalpaths [list] set finalpaths [list]
set is_windows [string match *windows* $::tcl_platform(platform)] set is_windows [string match *windows* $::tcl_platform(platform)]
@ -120,7 +117,9 @@ namespace eval punk::mix::util {
lappend finalpaths $p lappend finalpaths $p
} }
} }
#fauxlink is platform agnostic.
set has_fauxlink [expr {![catch {package require fauxlink}]}] set has_fauxlink [expr {![catch {package require fauxlink}]}]
#While .lnk files are windows specific, we want to be able to resolve them on other platforms if possible, so we try to load punk::winlnk on all platforms.
set has_winlnk [expr {![catch {package require punk::winlnk}]}] set has_winlnk [expr {![catch {package require punk::winlnk}]}]
if {!$opt_noredirect && ($has_fauxlink || $has_winlnk)} { if {!$opt_noredirect && ($has_fauxlink || $has_winlnk)} {

Loading…
Cancel
Save