summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp@users.sourceforge.net <dgp>2016-06-22 17:48:38 (GMT)
committerdgp@users.sourceforge.net <dgp>2016-06-22 17:48:38 (GMT)
commitd6c0adfa422c1e50ec5be1d35424d48c1b7a94ae (patch)
treea2761490c7e300266191f3047102845715f39e54
parentf77f8448b9dfc01d1f00976a7435b6aea688529d (diff)
downloadtk-d6c0adfa422c1e50ec5be1d35424d48c1b7a94ae.zip
tk-d6c0adfa422c1e50ec5be1d35424d48c1b7a94ae.tar.gz
tk-d6c0adfa422c1e50ec5be1d35424d48c1b7a94ae.tar.bz2
[787adc5ed7] Workaround potential crash in Tcl_DStringAppend.
-rw-r--r--generic/tkWindow.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkWindow.c b/generic/tkWindow.c
index f2e98e8..4ac2849 100644
--- a/generic/tkWindow.c
+++ b/generic/tkWindow.c
@@ -3175,7 +3175,7 @@ Initialize(
TkpGetAppName(interp, &class);
offset = Tcl_DStringLength(&class)+1;
- Tcl_DStringSetLength(&class, offset);
+ Tcl_DStringSetLength(&class, 2*offset);
Tcl_DStringAppend(&class, Tcl_DStringValue(&class), offset-1);
name = Tcl_DStringValue(&class) + offset;
} else {