1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* ext/tk/lib/multi-tk.rb: remove restriction on the class of

Browse Source 
pseudo-toplevel.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@10515 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2006-07-11 10:15:47 +00:00
parent 2ea953a7e7
commit 56b42dec01
2 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
Tue Jul 11 19:13:33 2006 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tk/lib/multi-tk.rb: remove restriction on the class of
pseudo-toplevel.
Tue Jul 11 18:00:57 2006 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tk/lib/multi-tk.rb: security fix.

6
ext/tk/lib/multi-tk.rb
View File

@ -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