1  #
   2  # tk/message.rb : treat message widget
   3  #
   4  require 'tk'
   5  require 'tk/label'
   6 
   7  class Tk::Message<Tk::Label
   8    TkCommandNames = ['message'.freeze].freeze
   9    WidgetClassName = 'Message'.freeze
  10    WidgetClassNames[WidgetClassName] = self
  11    #def create_self(keys)
  12    #  if keys and keys != None
  13    #    tk_call_without_enc('message', @path, *hash_kv(keys, true))
  14    #  else
  15    #    tk_call_without_enc('message', @path)
  16    #  end
  17    #end
  18    private :create_self
  19  end
  20 
  21  #TkMessage = Tk::Message unless Object.const_defined? :TkMessage
  22  Tk.__set_toplevel_aliases__(:Tk, Tk::Message, :TkMessage)