2004-07-06 09:42:12 +00:00
|
|
|
#
|
|
|
|
# tkextlib/bwidget/dynamichelp.rb
|
|
|
|
# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
|
|
|
|
#
|
|
|
|
|
|
|
|
require 'tk'
|
|
|
|
require 'tkextlib/bwidget.rb'
|
|
|
|
|
|
|
|
module Tk
|
|
|
|
module BWidget
|
|
|
|
module DynamicHelp
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
module Tk::BWidget::DynamicHelp
|
|
|
|
include Tk
|
|
|
|
extend Tk
|
|
|
|
|
|
|
|
def self.__pathname
|
|
|
|
'DynamicHelp::configure'
|
|
|
|
end
|
|
|
|
|
* ext/tk/extconf.rb: improbe messages [ruby-core:06325].
* ext/tk/lib/tk.rb, ext/tk/lib/tk/canvas.rb, ext/tk/lib/tk/entry.rb,
ext/tk/lib/tk/frame.rb, ext/tk/lib/tk/image.rb,
ext/tk/lib/tk/itemconfig.rb, ext/tk/lib/tk/labelframe.rb,
ext/tk/lib/tk/listbox.rb, ext/tk/lib/tk/menu.rb,
ext/tk/lib/tk/radiobutton.rb, ext/tk/lib/tk/scale.rb,
ext/tk/lib/tk/spinbox.rb, ext/tk/lib/tk/text.rb,
ext/tk/lib/tk/toplevel.rb: improve conversion of option values.
* ext/tk/lib/tkextlib/*: ditto.
* ext/tk/lib/tkextlib/*: update to support ActiveTcl8.4.11.2.
* ext/tk/lib/tkextlib/trofs/*: support Trofs 0.4.3.
* ext/tk/lib/tkextlib/tile/*: support Tile 0.7.2.
* ext/tk/lib/tkextlib/vu/*: support vu 2.3.0.
* ext/tk/lib/tkextlib/tcllib/*: support Tcllib 1.8 (Tklib 0.3).
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9448 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2005-10-22 22:17:08 +00:00
|
|
|
def __strval_optkeys
|
|
|
|
super() << 'topbackground'
|
|
|
|
end
|
|
|
|
private :__strval_optkeys
|
|
|
|
|
2004-07-06 09:42:12 +00:00
|
|
|
def self.__cget_cmd
|
|
|
|
['DynamicHelp::configure']
|
|
|
|
end
|
|
|
|
|
|
|
|
def self.__config_cmd
|
|
|
|
['DynamicHelp::configure']
|
|
|
|
end
|
|
|
|
|
|
|
|
def self.cget(slot)
|
|
|
|
self.current_configinfo(slot).values[0]
|
|
|
|
end
|
|
|
|
|
|
|
|
def self.add(widget, keys={})
|
|
|
|
tk_call('DynamicHelp::add', widget, *hash_kv(keys))
|
|
|
|
end
|
|
|
|
|
|
|
|
def self.delete(widget)
|
|
|
|
tk_call('DynamicHelp::delete', widget)
|
|
|
|
end
|
|
|
|
|
|
|
|
def self.include(klass, type)
|
|
|
|
tk_call('DynamicHelp::include', klass, type)
|
|
|
|
end
|
|
|
|
|
|
|
|
def self.sethelp(path, subpath, force=None)
|
|
|
|
tk_call('DynamicHelp::sethelp', path, subpath, force)
|
|
|
|
end
|
|
|
|
end
|