module Tk::TkSystemMenu - tk-0.2.0 Documentation

# module Tk::TkSystemMenu

### Public Class Methods

new(parent, keys=nil) click to toggle source

    # File lib/tk/menu.rb, line 480
    def initialize(parent, keys=nil)
      if parent.kind_of? Hash
        keys = _symbolkey2str(parent)
        parent = keys.delete('parent')
      end
      #unless parent.kind_of? TkMenu
      #  fail ArgumentError, "parent must be a TkMenu object"
      #end
      # @path = Kernel.format("%s.%s", parent.path, self.class::SYSMENU_NAME)
      @path = parent.path + '.' + self.class::SYSMENU_NAME
      #TkComm::Tk_WINDOWS[@path] = self
      TkCore::INTERP.tk_windows[@path] = self
      if self.method(:create_self).arity == 0
        p 'create_self has no arg' if $DEBUG
        create_self
        configure(keys) if keys
      else
        p 'create_self has an arg' if $DEBUG
        create_self(keys)
      end
    end