Cross Reference: /ast/src/lib/libtk/library/demos/rmt

Lines Matching refs:sel

65     catch {.t tag remove sel sel.first promptEnd}
66     if {[.t tag nextrange sel 1.0 end] == ""} {
73     catch {.t tag remove sel sel.first promptEnd}
74     if {[.t tag nextrange sel 1.0 end] == ""} {
116 	if {[$w compare sel.first <= insert]
117 		&& [$w compare sel.last >= insert]} {
118 	    $w tag remove sel sel.first promptEnd
119 	    $w delete sel.first sel.last