Import Tk 8.6.10
This commit is contained in:
@@ -206,6 +206,7 @@ test ttk-2.8 "bug 3223850: button state disabled during click" -setup {
|
||||
destroy .b
|
||||
set ttk28 {}
|
||||
pack [ttk::button .b -command {set ::ttk28 failed}]
|
||||
update
|
||||
} -body {
|
||||
bind .b <ButtonPress-1> {after 0 {.b configure -state disabled}}
|
||||
after 1 {event generate .b <ButtonPress-1>}
|
||||
@@ -269,7 +270,7 @@ test ttk-3.4 "SF#2009213" -body {
|
||||
test ttk-4.0 "Setup" -body {
|
||||
catch { destroy .t }
|
||||
pack [ttk::label .t -text "Button 1"]
|
||||
testConstraint fontOption [expr ![catch { set prevFont [.t cget -font] }]]
|
||||
testConstraint fontOption [expr {![catch { set prevFont [.t cget -font] }]}]
|
||||
ok
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user