From 56b42dec015337f6a1a30aee1a6e6364ded3e468 Mon Sep 17 00:00:00 2001 From: nagai Date: Tue, 11 Jul 2006 10:15:47 +0000 Subject: * ext/tk/lib/multi-tk.rb: remove restriction on the class of pseudo-toplevel. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@10515 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/tk/lib/multi-tk.rb | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'ext/tk') diff --git a/ext/tk/lib/multi-tk.rb b/ext/tk/lib/multi-tk.rb index 0211a15060..36cb4388ae 100644 --- a/ext/tk/lib/multi-tk.rb +++ b/ext/tk/lib/multi-tk.rb @@ -766,7 +766,8 @@ class MultiTkIp fail SecurityError, "no permission to manipulate" end - if m.kind_of?(Module) && m.respond_to?(:pseudo_toplevel_evaluable?) + # if m.kind_of?(Module) && m.respond_to?(:pseudo_toplevel_evaluable?) + if m.respond_to?(:pseudo_toplevel_evaluable?) @pseudo_toplevel[0] = true @pseudo_toplevel[1] = m else @@ -1770,7 +1771,8 @@ class MultiTkIp fail SecurityError, "no permission to manipulate" end - if m.kind_of?(Module) && m.respond_to?(:pseudo_toplevel_evaluable?) + # if m.kind_of?(Module) && m.respond_to?(:pseudo_toplevel_evaluable?) + if m.respond_to?(:pseudo_toplevel_evaluable?) @pseudo_toplevel[0] = true @pseudo_toplevel[1] = m else -- cgit v1.2.3