From f8e895cfcf4fe7ae32584a600abbead381ac5f3d 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: http://svn.ruby-lang.org/repos/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 0211a1506..36cb4388a 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