Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Bring back test window-2.9. No longer hangs. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
918a5e87caef6a3e5f267802b069e6d3 |
| User & Date: | dgp 2013-04-01 17:14:31 |
Context
|
2013-04-01
| ||
| 17:50 | 3607830 Runtime checks that Xkb is available in the X server before trying to use. Adapted from patch from Brian Griffin. check-in: a2433152 user: dgp tags: trunk | |
| 17:14 | Bring back test window-2.9. No longer hangs. check-in: 918a5e87 user: dgp tags: trunk | |
|
2013-03-29
| ||
| 08:47 | merge-mark check-in: 7b36f483 user: jan.nijtmans tags: trunk | |
Changes
Changes to ChangeLog.
1 2 3 4 5 6 7 | 2013-03-27 Jan Nijtmans <[email protected]> * library/button.tcl: [Bug 3608074]: Add <<Invoke>> bindings to * library/listbox.tcl: Button's, Listbox and Menu. * library/menu.tcl: * doc/event.n: Document <<Invoke>>, <<ThemeChanged>>, * doc/ttk_panedwindow.n: <<EnteredChild>> (ttk_pandedwindow only) and | > > > > | 1 2 3 4 5 6 7 8 9 10 11 | 2013-04-01 Don Porter <[email protected]> * tests/window.test: Bring back test window-2.9. No longer hangs. 2013-03-27 Jan Nijtmans <[email protected]> * library/button.tcl: [Bug 3608074]: Add <<Invoke>> bindings to * library/listbox.tcl: Button's, Listbox and Menu. * library/menu.tcl: * doc/event.n: Document <<Invoke>>, <<ThemeChanged>>, * doc/ttk_panedwindow.n: <<EnteredChild>> (ttk_pandedwindow only) and |
| ︙ | ︙ |
Changes to tests/window.test.
1 2 3 4 5 6 7 8 9 10 11 |
# This file is a Tcl script to test the procedures in the file
# tkWindow.c. It is organized in the standard fashion for Tcl tests.
#
# Copyright (c) 1995 Sun Microsystems, Inc.
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
package require tcltest 2.2
namespace import ::tcltest::*
tcltest::configure {*}$argv
tcltest::loadTestedCommands
| < < < | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
# This file is a Tcl script to test the procedures in the file
# tkWindow.c. It is organized in the standard fashion for Tcl tests.
#
# Copyright (c) 1995 Sun Microsystems, Inc.
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
package require tcltest 2.2
namespace import ::tcltest::*
tcltest::configure {*}$argv
tcltest::loadTestedCommands
namespace import ::tk::test::loadTkCommand
update
# XXX This file is woefully incomplete. Right now it only tests
# a few parts of a few procedures in tkWindow.c
# ----------------------------------------------------------------------
|
| ︙ | ︙ | |||
188 189 190 191 192 193 194 |
} else {
set error 0
}
removeFile script
list $error $msg
} -result {0 {}}
| < | | 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 |
} else {
set error 0
}
removeFile script
list $error $msg
} -result {0 {}}
test window-2.9 {Tk_DestroyWindow, Destroy bindings evaluated after exit} -constraints {
unixOrWin
} -body {
set code [loadTkCommand]
append code {
toplevel .t1
toplevel .t2
update
bind .t2 <Destroy> {puts "Destroy .t2" ; exit 1}
|
| ︙ | ︙ |