This script crashes most of the time:

package require Itk 4.1
package require Iwidgets 4.1

while 1 {
iwidgets::Buttonbox .bb

.bb add Yes -text Yes
.bb configure -highlightthickness 2
catch {.bb add Maybe -text Maybe} msg

destroy .bb
}