Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Tests for Ticket [5d991b822e]. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | bug-5d991b822e |
| Files: | files | file ages | folders |
| SHA3-256: |
b548ba430a89a38a84474176c075db52 |
| User & Date: | dgp 2019-05-11 20:36:25 |
Context
|
2019-05-11
| ||
| 20:53 | Fix for the [button ... -textvariable] parts of [5d991b822e]. check-in: 65342540 user: dgp tags: bug-5d991b822e | |
| 20:36 | Tests for Ticket [5d991b822e]. check-in: b548ba43 user: dgp tags: bug-5d991b822e | |
|
2018-02-03
| ||
| 15:07 | Fix [9d27218f76]: ttk::spinbox doc page mentions current, but it is not a valid command check-in: 35639ec2 user: fvogel tags: core-8-6-branch | |
Changes
Changes to tests/button.test.
3953 3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 |
focus -force .top.b
update
event generate .top.b <space>
update ; # shall not trigger error invalid command name ".top.b"
} -cleanup {
destroy .top.b .top
} -result {}
imageFinish
cleanupTests
return
# Local variables:
# mode: tcl
# End:
|
> > > > > > > > > > > > > > > > > > > > > > > > > > > |
3953 3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974 3975 3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988 3989 3990 3991 3992 3993 3994 |
focus -force .top.b
update
event generate .top.b <space>
update ; # shall not trigger error invalid command name ".top.b"
} -cleanup {
destroy .top.b .top
} -result {}
test button-15.1 {Bug [5d991b822e]} {
# Want this not to segfault
set var INIT
button .b -textvariable var
trace add variable var unset {apply {args {
.b configure -textvariable {}
}}}
pack .b
bind .b <Configure> {unset var}
update
destroy .b
} {}
test button-15.2 {Bug [5d991b822e]} {
# Want this not to leak traces
set var INIT
button .b -textvariable var
trace add variable var unset {apply {args {
.b configure -textvariable new
}}}
pack .b
bind .b <Configure> {unset var}
update
destroy .b
unset new
} {}
imageFinish
cleanupTests
return
# Local variables:
# mode: tcl
# End:
|