TkWarning2 ^(Class)

# File tk/lib/tk/dialog.rb, line 245
  def initialize(parent = nil, mes = nil)
    if !mes
      if parent.kind_of? TkWindow
        mes = ""
      else
        mes = parent.to_s
        parent = nil
      end
    end
    super(parent, :message=>mes)
  end

# File tk/lib/tk/dialog.rb, line 257
  def show(mes = nil)
    mes_bup = @message
    @message = mes if mes
    ret = super()
    @message = mes_bup
    ret
  end