diff options
author | yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-08-25 15:13:14 +0000 |
---|---|---|
committer | yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-08-25 15:13:14 +0000 |
commit | d0233291bc8a5068e52c69c210e5979e5324b5bc (patch) | |
tree | 7d9459449c33792c63eeb7baa071e76352e0baab /trunk/ext/tk/lib/tk/radiobutton.rb | |
parent | 0dc342de848a642ecce8db697b8fecd83a63e117 (diff) | |
parent | 72eaacaa15256ab95c3b52ea386f88586fb9da40 (diff) |
re-adding tag v1_9_0_4 as an alias of trunk@18848v1_9_0_4
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_9_0_4@18849 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'trunk/ext/tk/lib/tk/radiobutton.rb')
-rw-r--r-- | trunk/ext/tk/lib/tk/radiobutton.rb | 71 |
1 files changed, 0 insertions, 71 deletions
diff --git a/trunk/ext/tk/lib/tk/radiobutton.rb b/trunk/ext/tk/lib/tk/radiobutton.rb deleted file mode 100644 index 1f864ec06b..0000000000 --- a/trunk/ext/tk/lib/tk/radiobutton.rb +++ /dev/null @@ -1,71 +0,0 @@ -# -# tk/radiobutton.rb : treat radiobutton widget -# -require 'tk' -require 'tk/button' - -class Tk::RadioButton<Tk::Button - TkCommandNames = ['radiobutton'.freeze].freeze - WidgetClassName = 'Radiobutton'.freeze - WidgetClassNames[WidgetClassName] = self - #def create_self(keys) - # if keys and keys != None - # tk_call_without_enc('radiobutton', @path, *hash_kv(keys, true)) - # else - # tk_call_without_enc('radiobutton', @path) - # end - #end - #private :create_self - - def __boolval_optkeys - super() << 'indicatoron' - end - private :__boolval_optkeys - - def __strval_optkeys - super() << 'selectcolor' - end - private :__strval_optkeys - - def __ruby2val_optkeys # { key=>proc, ... } - { - 'variable'=>proc{|v| tk_trace_variable(v)} # for backward compatibility - } - end - private :__ruby2val_optkeys - - - def deselect - tk_send_without_enc('deselect') - self - end - def select - tk_send_without_enc('select') - self - end - - def get_value - var = tk_send_without_enc('cget', '-variable') - if TkVariable::USE_TCLs_SET_VARIABLE_FUNCTIONS - _fromUTF8(INTERP._get_global_var(var)) - else - INTERP._eval(Kernel.format('global %s; set %s', var, var)) - end - end - - def set_value(val) - var = tk_send_without_enc('cget', '-variable') - if TkVariable::USE_TCLs_SET_VARIABLE_FUNCTIONS - _fromUTF8(INTERP._set_global_var(var, _get_eval_string(val, true))) - else - s = '"' + _get_eval_string(val).gsub(/[\[\]$"\\]/, '\\\\\&') + '"' - INTERP._eval(Kernel.format('global %s; set %s %s', var, var, s)) - end - end -end - -Tk::Radiobutton = Tk::RadioButton -#TkRadioButton = Tk::RadioButton unless Object.const_defined? :TkRadioButton -#TkRadiobutton = Tk::Radiobutton unless Object.const_defined? :TkRadiobutton -Tk.__set_toplevel_aliases__(:Tk, Tk::RadioButton, - :TkRadioButton, :TkRadiobutton) |