Lines Matching defs:tree
29 global tree text doc view
40 $tree configure -rootnode {}
45 if {[lsearch $view tree] >= 0} {
46 $tree configure -rootnode $doc
55 proc View:tree {} {
58 set view tree
67 set view {tree text}
69 .controls.view configure -text {Tree Only} -command View:tree
87 labelframe $p.tree -text {Tree View}
88 $p add $p.tree -minsize 200
89 set tree [domtree::create $p.tree.t \
90 -yscrollcommand [list $p.tree.y set] \
91 -xscrollcommand [list $p.tree.x set]]
92 scrollbar $p.tree.y -orient vertical -command [list $p.tree.t yview]
93 scrollbar $p.tree.x -orient horizontal -command [list $p.tree.t xview]
94 grid $p.tree.t -row 0 -column 0 -sticky news
95 grid $p.tree.y -row 0 -column 1 -sticky ns
96 grid $p.tree.x -row 1 -column 0 -sticky ew
97 grid rowconfigure $p.tree 0 -weight 1
98 grid columnconfigure $p.tree 0 -weight 1