Lines Matching refs:match
82 ## megawidget routine will match your options and methods on a unique
101 if {[string match {} [set arg [info commands $prefix$cmd]]]} {
131 if {[string match ${what}* options]} {
140 if {[string match $CLASS [winfo class $root]]} {
179 if {[string match {} [set arg [info commands ${namesp}::_$subcmd]]]} {
206 ## If -type and -base don't match, we need a special setup
220 [expr {[string match toplevel $class(type)]?{}:{$w}}] $CLASS\]"
236 if {[string match base $name]} {
242 if {[string match toplevel $type]} {
256 [expr [string match toplevel $class(type)]?{wm withdraw \$w\n}:{}]
259 if {\[string match -* \$options(\$o)\]} continue
376 if {![string match {[A-Z]*} $CLASS] || [string match { } $CLASS]} {
428 if {[string match toplevel $classopts(-base)] && \
476 if {[string match *.* $wid] && \
484 if {[string match base $type]} {
487 if {[string match $type $class(type)]} continue
531 if {[string match {} [info commands ${namesp}::construct]]} {
540 if {[string match {} [info commands ${namesp}::init]]} {
592 if {[string match {} [info commands ${namesp}::destruct]]} {
606 if {[info exists options($args)]&&[string match -* $options($args)]} {
609 if {[string match {} [set arg [array names data $args]]]} {
634 [string match -* $options($args)]} {
637 if {[string match {} [set arg [array names data $args]]]} {
662 [string match -* $options($key)]} {
665 if {[string match {} [set arg [array names data $key]]]} {
697 if {[string match -* $options($opt)]} {
710 if {[string match {} [info commands ${namesp}::configure]]} {