Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | fix select-5.15 test case [Bug 2441988] |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
732872908bcdee52c52ab816ed744aa7 |
| User & Date: | jan.nijtmans 2012-07-01 10:54:03 |
Context
|
2012-07-02
| ||
| 17:45 | ttk::*: Ensure that all tables passed to Tcl_GetIndexFromObj{Struct} are statically allocated. Caught by Michael Kirkham. check-in: 8cc4c440 user: jenglish tags: trunk | |
|
2012-07-01
| ||
| 11:03 | merge trunk check-in: 25fbdeab user: jan.nijtmans tags: bug-2443069 | |
| 10:54 | fix select-5.15 test case [Bug 2441988] check-in: 73287290 user: jan.nijtmans tags: trunk | |
|
2012-06-28
| ||
| 21:05 | autoconf-2.59 check-in: 26434033 user: jan.nijtmans tags: trunk | |
Changes
Changes to tests/select.test.
| ︙ | ︙ | |||
624 625 626 627 628 629 630 |
setup
if {[llength [info command ::bgerror]]} {
rename ::bgerror ::TMPbgerror
}
set ::bgerrors {}
} -body {
proc ::bgerror msg {lappend ::bgerrors $msg}
| | | 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 |
setup
if {[llength [info command ::bgerror]]} {
rename ::bgerror ::TMPbgerror
}
set ::bgerrors {}
} -body {
proc ::bgerror msg {lappend ::bgerrors $msg}
selection handle -type ERROR .f1 errHandler
list [catch {selection get ERROR} msg] $msg [update] {*}$::bgerrors
} -cleanup {
rename ::bgerror {}
if {[llength [info command ::TMPbgerror]]} {
rename ::TMPbgerror ::bgerror
}
} -result {1 {PRIMARY selection doesn't exist or form "ERROR" not defined} {} {selection handler aborted}}
|
| ︙ | ︙ |