mirror of
https://github.com/ruby/ruby.git
synced 2025-08-25 05:55:46 +02:00
* ext/tk/lib : improve framework of developping Tcl/Tk extension wrappers
* BWidget extension support on Ruby/Tk git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6586 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
3d8fa55561
commit
d8465ff9ab
138 changed files with 8457 additions and 426 deletions
|
@ -9,21 +9,27 @@ require 'tk'
|
|||
require 'tkextlib/setup.rb'
|
||||
|
||||
# call setup script
|
||||
require File.join(File.dirname(File.expand_path(__FILE__)), 'setup.rb')
|
||||
require 'tkextlib/tkHTML/setup.rb'
|
||||
|
||||
# TkPackage.require('Tkhtml', '2.0')
|
||||
TkPackage.require('Tkhtml')
|
||||
|
||||
module Tk
|
||||
class HTML_Widget < TkWindow
|
||||
def self.package_version
|
||||
begin
|
||||
TkPackage.require('Tkhtml')
|
||||
rescue
|
||||
''
|
||||
end
|
||||
end
|
||||
|
||||
class ClippingWindow < TkWindow
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
class Tk::HTML_Widget::ClippingWindow
|
||||
extend TkUtil
|
||||
|
||||
WidgetClassName = 'HtmlClip'.freeze
|
||||
WidgetClassNames[WidgetClassName] = self
|
||||
|
||||
|
@ -32,7 +38,7 @@ class Tk::HTML_Widget::ClippingWindow
|
|||
|
||||
def self.new(parent, keys={})
|
||||
if parent.kind_of?(Hash)
|
||||
keys = _symbolkey2str(parent)
|
||||
keys = TkComm._symbolkey2str(parent)
|
||||
parent = keys.delete('parent')
|
||||
end
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue