1#
2# tk/checkbutton.rb : treat checkbutton widget
3#
4require 'tk'
5require 'tk/radiobutton'
6
7class Tk::CheckButton<Tk::RadioButton
8  TkCommandNames = ['checkbutton'.freeze].freeze
9  WidgetClassName = 'Checkbutton'.freeze
10  WidgetClassNames[WidgetClassName] ||= self
11  #def create_self(keys)
12  #  if keys and keys != None
13  #    tk_call_without_enc('checkbutton', @path, *hash_kv(keys, true))
14  #  else
15  #    tk_call_without_enc('checkbutton', @path)
16  #  end
17  #end
18  #private :create_self
19
20  def toggle
21    tk_send_without_enc('toggle')
22    self
23  end
24end
25
26Tk::Checkbutton = Tk::CheckButton
27#TkCheckButton = Tk::CheckButton unless Object.const_defined? :TkCheckButton
28#TkCheckbutton = Tk::Checkbutton unless Object.const_defined? :TkCheckbutton
29#Tk.__set_toplevel_aliases__(:Tk, Tk::CheckButton,
30#                            :TkCheckButton, :TkCheckbutton)
31Tk.__set_loaded_toplevel_aliases__('tk/checkbutton.rb', :Tk, Tk::CheckButton,
32                                   :TkCheckButton, :TkCheckbutton)
33