• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /barrelfish-2018-10-04/usr/eclipseclp/lib_tcl/widget/

Lines Matching refs:root

48 ##	form a path to the node from the root.  Thus the first
49 ## element of this list will always be the root node.
75 ## node-names which form a path to the node from the root.
77 ## root node. Also appended is a
110 ## -root rootname DEFAULT: {}
111 ## The name of the root node of the tree. Each node
128 ## string which will reset the root node to its parent.
161 ## root - specifies the root item.
312 {-root root Root {}}
387 uplevel [list hierarchy $w -root [pwd] \
395 uplevel [list hierarchy $w -root . \
424 set data(:$data(-root),showkids) 0
425 ExpandNodeN $w $data(-root) $data(-expand)
426 if {[catch {$w see $data(-root)}]} {
435 array set config { resize 0 root 0 showall 0 }
461 -root {
462 if {[info exists data(:$data(-root),showkids)]} {
468 set data(-root) $val
469 set config(root) 1
495 if {$config(root)} {
498 } elseif {$config(showall) && [info exists data(:$data(-root),showkids)]} {
517 } elseif {[regexp {^(root|anchor)$} $idx]} {
518 return [$c find withtag box:$data(-root)]
752 ## -dec makes it sort in root-first order
767 Redraw $w $data(-root)
926 ([string compare $data(-root) {}] && \
927 ![string compare $data(-root) $np])} {
1049 Recompute $w $data(-root) [lrange $cnp 1 end]
1053 Redraw_aux $w $data(-root) 4 4
1429 # For single and browse mode, it just selects the root element.
1438 _selection $w set root
1516 set root $data(-root)
1518 [string match $root $np]} {
1519 if {![regexp {^(.:)?/+$} $root] && \
1520 [string compare [file dir $root] $root]} {
1535 $w configure -root [file dir $data(-root)]