diff options
Diffstat (limited to 'trunk/ext/tk/lib/tkextlib/tile/tscale.rb')
-rw-r--r-- | trunk/ext/tk/lib/tkextlib/tile/tscale.rb | 53 |
1 files changed, 0 insertions, 53 deletions
diff --git a/trunk/ext/tk/lib/tkextlib/tile/tscale.rb b/trunk/ext/tk/lib/tkextlib/tile/tscale.rb deleted file mode 100644 index 2c46fd9bd4..0000000000 --- a/trunk/ext/tk/lib/tkextlib/tile/tscale.rb +++ /dev/null @@ -1,53 +0,0 @@ -# -# tscale & tprogress widget -# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp) -# -require 'tk' -require 'tkextlib/tile.rb' - -module Tk - module Tile - class TScale < Tk::Scale - end - Scale = TScale - - class TProgress < TScale - end - Progress = TProgress - end -end - -Tk.__set_toplevel_aliases__(:Ttk, Tk::Tile::Scale, :TkScale) - - -class Tk::Tile::TScale < Tk::Scale - include Tk::Tile::TileWidget - - if Tk::Tile::USE_TTK_NAMESPACE - TkCommandNames = ['::ttk::scale'.freeze].freeze - else - TkCommandNames = ['::tscale'.freeze].freeze - end - WidgetClassName = 'TScale'.freeze - WidgetClassNames[WidgetClassName] = self - - def self.style(*args) - [self::WidgetClassName, *(args.map!{|a| _get_eval_string(a)})].join('.') - end -end - -class Tk::Tile::TProgress < Tk::Tile::TScale - include Tk::Tile::TileWidget - - if Tk::Tile::USE_TTK_NAMESPACE - TkCommandNames = ['::ttk::progress'.freeze].freeze - else - TkCommandNames = ['::tprogress'.freeze].freeze - end - WidgetClassName = 'TProgress'.freeze - WidgetClassNames[WidgetClassName] = self - - def self.style(*args) - [self::WidgetClassName, *(args.map!{|a| _get_eval_string(a)})].join('.') - end -end |