| In: |
tk/lib/tk/root.rb
|
| Parent: | TkWindow |
# File tk/lib/tk/root.rb, line 31 def TkRoot.new(keys=nil, &b) unless TkCore::INTERP.tk_windows['.'] TkCore::INTERP.tk_windows['.'] = super(:without_creating=>true, :widgetname=>'.'){} end root = TkCore::INTERP.tk_windows['.'] if keys # wm commands keys.each{|k,v| if v.kind_of? Array root.send(k,*v) else root.send(k,v) end } end root.instance_eval(&b) if block_given? root end