summaryrefslogtreecommitdiffstats
path: root/tests/listbox.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-03-11 18:39:23 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-03-11 18:39:23 (GMT)
commite26359c3f1ac6a3e9bd2c0eb0abb3cccb7a86774 (patch)
tree8d99c3d688bd25abab53e0bf56261399255a5e32 /tests/listbox.test
parent0e5747eb2704c1b05cd30ccdf45fdc070851d8e8 (diff)
parent80d43beb6caae9ce728cd5054194124706038073 (diff)
downloadtk-e26359c3f1ac6a3e9bd2c0eb0abb3cccb7a86774.zip
tk-e26359c3f1ac6a3e9bd2c0eb0abb3cccb7a86774.tar.gz
tk-e26359c3f1ac6a3e9bd2c0eb0abb3cccb7a86774.tar.bz2
3607326 Stop segfault from [listbox .l -listvariable $array].
Diffstat (limited to 'tests/listbox.test')
-rw-r--r--tests/listbox.test11
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/listbox.test b/tests/listbox.test
index 0805528..e05d574 100644
--- a/tests/listbox.test
+++ b/tests/listbox.test
@@ -3057,6 +3057,17 @@ test listbox-29.1 {listbox selection behavior, -state disabled} -setup {
destroy .l
} -result {1 1 2}
+test listbox-30.1 {Bug 3607326} -setup {
+ destroy .l
+ unset -nocomplain a
+} -body {
+ array set a {}
+ listbox .l -listvariable a
+} -cleanup {
+ destroy .l
+ unset -nocomplain a
+} -result * -match glob -returnCodes error
+
resetGridInfo
deleteWindows
option clear