iwidgets::pushbutton .pb \ -text "Go ahead, hit me..." \ -command {puts OUCH!!} \ -defaultring 1
pack .pb \ -padx 12 \ -pady 12