1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00

* ext/tcltklib/tcltklib.c (ip_delete): when a tcltkip is deleted, destroy its root widget

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6842 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2004-08-31 07:09:49 +00:00
parent b064a106d5
commit 24053adc1e
2 changed files with 6 additions and 0 deletions

View file

@ -1,3 +1,8 @@
Tue Aug 31 16:04:22 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tcltklib/tcltklib.c (ip_delete): when a tcltkip is deleted,
destroy its root widget
Tue Aug 31 12:30:36 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tcltklib/tcltklib.c (del_root): fix SEGV

View file

@ -3094,6 +3094,7 @@ ip_delete(self)
{
struct tcltkip *ptr = get_ip(self);
del_root(ptr->ip);
Tcl_DeleteInterp(ptr->ip);
return Qnil;