summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authornagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-03-06 15:03:02 +0000
committernagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-03-06 15:03:02 +0000
commit8cdcf31d0626b0daea00acb7b04f3408432e74f8 (patch)
tree83ae76baac6e0ce063036f02a85af7d342c55268
parent1cbc53117bbd5ca60daf63486e3809cb6b41496d (diff)
downloadruby-8cdcf31d0626b0daea00acb7b04f3408432e74f8.tar.gz
ruby-8cdcf31d0626b0daea00acb7b04f3408432e74f8.tar.xz
ruby-8cdcf31d0626b0daea00acb7b04f3408432e74f8.zip
* ext/tk/tcltklib.c: fail to call TclTkLib.mainloop when $SAFE==4
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@8091 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r--ChangeLog4
-rw-r--r--ext/tk/tcltklib.c1
2 files changed, 5 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 1e32e0f74..bee6b3644 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Mar 7 00:01:55 2005 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
+
+ * ext/tk/tcltklib.c: fail to call TclTkLib.mainloop when $SAFE==4
+
Sun Mar 6 13:04:10 2005 Dee Zsombor <zsombor@ruby-lang.org>
* misc/ruby-electric.el: added.
diff --git a/ext/tk/tcltklib.c b/ext/tk/tcltklib.c
index 14e8199d8..6bc8c3185 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;