diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-05 07:35:41 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-05 07:35:41 +0000 |
| commit | 854f86e8ba65bed226ae3fbb8f385f68c51a6260 (patch) | |
| tree | 16fe50605850246eac6978041e4470c3b678681c /ext/tk/lib/tkextlib/tile/tlabel.rb | |
| parent | 47839448767f922a88956a7d4a30c77c36a53304 (diff) | |
* ext/tk/lib/multi-tk.rb: freeze callback-entry objects
* ext/tk/lib/tkextlib/tile.rb: support tile-0.6
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8075 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tkextlib/tile/tlabel.rb')
| -rw-r--r-- | ext/tk/lib/tkextlib/tile/tlabel.rb | 15 |
1 files changed, 5 insertions, 10 deletions
diff --git a/ext/tk/lib/tkextlib/tile/tlabel.rb b/ext/tk/lib/tkextlib/tile/tlabel.rb index d2eaf45273..256d37670e 100644 --- a/ext/tk/lib/tkextlib/tile/tlabel.rb +++ b/ext/tk/lib/tkextlib/tile/tlabel.rb @@ -15,16 +15,11 @@ end class Tk::Tile::TLabel < TkLabel include Tk::Tile::TileWidget - TkCommandNames = ['tlabel'.freeze].freeze + if Tk::Tile::USE_TTK_NAMESPACE + TkCommandNames = ['::ttk::label'.freeze].freeze + else + TkCommandNames = ['::tlabel'.freeze].freeze + end WidgetClassName = 'TLabel'.freeze WidgetClassNames[WidgetClassName] = self - - def create_self(keys) - if keys and keys != None - tk_call_without_enc('tlabel', @path, *hash_kv(keys, true)) - else - tk_call_without_enc('tlabel', @path) - end - end - private :create_self end |