mirror of
https://github.com/ruby/ruby.git
synced 2025-08-25 05:55:46 +02:00
d8465ff9ab
* BWidget extension support on Ruby/Tk git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6586 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
33 lines
593 B
Ruby
33 lines
593 B
Ruby
#
|
|
# tkextlib/tcllib/style.rb
|
|
# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
|
|
#
|
|
# * Part of tcllib extension
|
|
# * select and use some 'style' of option (resource) DB
|
|
#
|
|
|
|
require 'tk'
|
|
require 'tkextlib/tcllib.rb'
|
|
|
|
# TkPackage.require('style', '0.1')
|
|
TkPackage.require('style')
|
|
|
|
module Tk
|
|
module Style
|
|
def self.package_version
|
|
begin
|
|
TkPackage.require('style')
|
|
rescue
|
|
''
|
|
end
|
|
end
|
|
|
|
def self.names
|
|
tk_split_simplelist(tk_call('style::names'))
|
|
end
|
|
|
|
def self.use(style)
|
|
tk_call('style::use', style)
|
|
end
|
|
end
|
|
end
|