Укоротил имя корневого каталога в дереве
This commit is contained in:
parent
b6dc24ca29
commit
1142324008
|
@ -149,7 +149,7 @@ namespace eval FileOper {
|
||||||
if {[catch {cd $directory}] != 0} {
|
if {[catch {cd $directory}] != 0} {
|
||||||
return ""
|
return ""
|
||||||
}
|
}
|
||||||
set parent [Tree::InsertItem $tree {} $directory "directory" $directory]
|
set parent [Tree::InsertItem $tree {} $directory "directory" [file tail $directory]]
|
||||||
# if {[ $tree item $parent -open] eq "false"} {
|
# if {[ $tree item $parent -open] eq "false"} {
|
||||||
# $tree item $parent -open true
|
# $tree item $parent -open true
|
||||||
# } else {
|
# } else {
|
||||||
|
|
Loading…
Reference in New Issue
Block a user