Lines Matching refs:val
105 foreach {key val} $args {
107 -borderwidth - -relief { .$w configure $key $val }
108 -labelanchor { $data(label) configure -anchor $val }
109 -labelfont { $data(label) configure -font $val }
110 -labelforeground { $data(label) configure -foreground $val }
112 $data(label) configure -text $val
113 if {[string compare {} $val]} {
119 -labelwidth { $data(label) configure -width $val }
121 if {![regexp {^(focus|focusin|focusout|all|none|key)$} $val]} {
122 return -code error "Invalid validation type \"$val\""
125 -textvariable { $data(basecmd) configure -textvariable $val }
127 set data($key) $val
204 set val [regexp {^(1|yes|true|on)$} $result]
205 if $val { set code 0 } else { set code 3 }