summaryrefslogtreecommitdiffstats
path: root/generic/tkListbox.c
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 /generic/tkListbox.c
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 'generic/tkListbox.c')
-rw-r--r--generic/tkListbox.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/generic/tkListbox.c b/generic/tkListbox.c
index 48287ee..d77fc8f 100644
--- a/generic/tkListbox.c
+++ b/generic/tkListbox.c
@@ -1629,9 +1629,6 @@ ConfigureListbox(
if (Tcl_SetVar2Ex(interp, listPtr->listVarName, NULL,
listVarObj, TCL_GLOBAL_ONLY|TCL_LEAVE_ERR_MSG)
== NULL) {
- if (oldListObj == NULL) {
- Tcl_DecrRefCount(listVarObj);
- }
continue;
}
}