Cross Reference: /ast/src/lib/libtk/library/text.tcl

Lines Matching refs:selectMode

31 # selectMode -		The style of selection currently underway:
53     set tkPriv(selectMode) word
58     set tkPriv(selectMode) line
64     set tkPriv(selectMode) char
68     set tkPriv(selectMode) word
72     set tkPriv(selectMode) line
231     set tkPriv(selectMode) char
235     set tkPriv(selectMode) char
437     set tkPriv(selectMode) char
468     switch $tkPriv(selectMode) {
497     if {$tkPriv(mouseMoved) || ($tkPriv(selectMode) != "char")} {