Lines Matching refs:w_list
9 field w_list ; # list of currently filtered specs
103 set w_list $w.list.l
104 listbox $w_list \
113 $w_list configure -relief flat -highlightthickness 0 -borderwidth 0
115 pack $w_list -fill both -expand 1
117 bind $w_list <Any-Motion> [cb _show_tooltip @%x,%y]
118 bind $w_list <Any-Enter> [cb _hide_tooltip]
119 bind $w_list <Any-Leave> [cb _hide_tooltip]
120 bind $w_list <Destroy> [cb _hide_tooltip]
130 bind $w_filter <Key-Return> [list focus $w_list]\;break
131 bind $w_filter <Key-Down> [list focus $w_list]
229 $w_list selection clear 0 end
230 $w_list selection set $i
257 set i [$w_list curselection]
283 bind $w_list $event $script
295 set i [$w_list curselection]
338 set i [$w_list curselection]
398 if {[$w_list cget -state] eq {disabled}} {
399 $w_list configure -state normal
401 $w_list delete 0 end
411 $w_list insert end $txt
415 $w_list selection clear 0 end
416 $w_list selection set 0
420 $w_list configure -state $ste
448 ${NS}::scrollbar $sb -orient h -command [list $w_list xview]
449 pack $sb -fill x -side bottom -before $w_list
451 ${NS}::scrollbar $sb -orient v -command [list $w_list yview]
452 pack $sb -fill y -side right -before $w_list
475 set pos_x [winfo pointerx $w_list]
476 set pos_y [winfo pointery $w_list]
477 if {[winfo containing $pos_x $pos_y] ne $w_list} {
483 [expr {$pos_x - [winfo rootx $w_list]}] \
484 [expr {$pos_y - [winfo rooty $w_list]}]] ,]
485 set lno [$w_list index $pos]
502 wm transient $tooltip_wm [winfo toplevel $w_list]