Исправлена некорректная установка иконки на каталог

2022-08-26 16:25:19 +03:00 · 2022-08-26 16:25:19 +03:00 · cb77304a78
parent 2f7b37ac66
commit cb77304a78
1 changed files with 2 additions and 2 deletions
--- a/lib/tree.tcl
+++ b/lib/tree.tcl
@ -37,9 +37,9 @@ namespace eval Tree {
            directory {
                regsub -all {\.|/|\\|\s} $item "_" subNode
                # puts $subNode
-                if {[string match {*debian*} [string tolower $item]]} {
+                if {[string match {*debian*} [string tolower [file tail $item]]]} {
                    set image [::FindImage debian]
-                } elseif {[string match {*redhat*} [string tolower $item]]} {
+                } elseif {[string match {*redhat*} [string tolower [file tail $item]]]} {
                    set image [::FindImage redhat]
                } else {
                    set image pixel