Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Make new tests more robust against context. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | core-8-6-branch |
| Files: | files | file ages | folders |
| SHA3-256: |
2bdcb4bea6b4b7a61f0270daaecc435b |
| User & Date: | dgp 2019-05-15 20:02:09 |
Context
|
2019-05-16
| ||
| 13:03 | In Aqua, draw dark mode menubuttons as inactive, as is done for buttons. This makes them imperfect, but usable. This is the best we can do as long as HITheme is used for drawing. For correct appearance use ttk::menubutton. check-in: 256af6d0 user: culler tags: core-8-6-branch | |
| 09:18 | Merge 8.6 check-in: faf08b52 user: jan.nijtmans tags: trunk | |
|
2019-05-15
| ||
| 20:02 | Make new tests more robust against context. check-in: 2bdcb4be user: dgp tags: core-8-6-branch | |
| 19:33 | Revised bug fix for [5d991b822e]. check-in: afbac00c user: dgp tags: core-8-6-branch | |
Changes
Changes to tests/menubut.test.
749 750 751 752 753 754 755 756 757 758 759 760 761 762 |
set res1 [list [winfo children .] [interp hidden]]
set res2 [list {} $l]
expr {$res1 eq $res2}
} -result 1
test menubutton-9.1 {Bug [5d991b822e]} {
# Want this not to segfault, or write to variable with empty name
set var INIT
menubutton .b -textvariable var
trace add variable var unset {apply {args {
.b configure -textvariable {}
}}}
pack .b
bind .b <Configure> {unset var}
|
> |
749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 |
set res1 [list [winfo children .] [interp hidden]]
set res2 [list {} $l]
expr {$res1 eq $res2}
} -result 1
test menubutton-9.1 {Bug [5d991b822e]} {
# Want this not to segfault, or write to variable with empty name
unset -nocomplain {}
set var INIT
menubutton .b -textvariable var
trace add variable var unset {apply {args {
.b configure -textvariable {}
}}}
pack .b
bind .b <Configure> {unset var}
|
Changes to tests/message.test.
468 469 470 471 472 473 474 475 476 477 478 479 480 481 |
lindex [.m configure -bd] 4
} -cleanup {
destroy .m
} -result {4}
test message-4.1 {Bug [5d991b822e]} {
# Want this not to segfault, or write to variable with empty name
set var INIT
message .b -textvariable var
trace add variable var unset {apply {args {
.b configure -textvariable {}
}}}
pack .b
bind .b <Configure> {unset var}
|
> |
468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 |
lindex [.m configure -bd] 4
} -cleanup {
destroy .m
} -result {4}
test message-4.1 {Bug [5d991b822e]} {
# Want this not to segfault, or write to variable with empty name
unset -nocomplain {}
set var INIT
message .b -textvariable var
trace add variable var unset {apply {args {
.b configure -textvariable {}
}}}
pack .b
bind .b <Configure> {unset var}
|