diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-06 15:03:02 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-06 15:03:02 +0000 |
| commit | 9c7c117d505704f20846ee7c7f2edb7e595366dc (patch) | |
| tree | 83ae76baac6e0ce063036f02a85af7d342c55268 /ext/tk/tcltklib.c | |
| parent | 5a4f8179fe31ca75141277f4d320bf9c9663b192 (diff) | |
| download | ruby-9c7c117d505704f20846ee7c7f2edb7e595366dc.tar.gz | |
* ext/tk/tcltklib.c: fail to call TclTkLib.mainloop when $SAFE==4
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8091 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/tcltklib.c')
| -rw-r--r-- | ext/tk/tcltklib.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/tk/tcltklib.c b/ext/tk/tcltklib.c index 14e8199d89..6bc8c3185f 100644 --- a/ext/tk/tcltklib.c +++ b/ext/tk/tcltklib.c @@ -8394,6 +8394,7 @@ Init_tcltklib() #define DEFAULT_EVENTLOOP_DEPTH 7 #endif eventloop_stack = rb_ary_new2(DEFAULT_EVENTLOOP_DEPTH); + OBJ_TAINT(eventloop_stack); watchdog_thread = Qnil; |