47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
# File 'lib/tkextlib/tkHTML/htmlwidget.rb', line 47
def self.new(parent, keys={})
if parent.kind_of?(Hash)
keys = TkComm._symbolkey2str(parent)
parent = keys.delete('parent')
end
if parent.kind_of?(String)
ppath = parent.path
elsif parent
ppath = parent
else
ppath = ''
end
HtmlClip_TBL.mutex.synchronize{
return HtmlClip_TBL[ppath] if HtmlClip_TBL[ppath]
}
widgetname = keys.delete('widgetname')
if widgetname =~ /^(.*)\.[^.]+$/
ppath2 = $1
if ppath2[0] != ?.
ppath2 = ppath + '.' + ppath2
end
HtmlClip_TBL.mutex.synchronize{
return HtmlClip_TBL[ppath2] if HtmlClip_TBL[ppath2]
}
ppath = ppath2
end
parent = TkComm._genobj_for_tkwidget(ppath)
unless parent.kind_of?(Tk::HTML_Widget)
fail ArgumentError, "parent must be a Tk::HTML_Widget instance"
end
super(parent)
end
|