* backport changes from 1.9

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@5399 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2004-01-07 09:28:18 +00:00
parent 6a194f195c
commit ea37276b9a
3 changed files with 78 additions and 14 deletions

View file

@ -862,6 +862,13 @@ end
class TkcWindow<TkcItem
CItemTypeToClass['window'] = self
def create_self(*args)
keys = args.pop
if keys && keys.kind_of?(Hash)
keys = _symbolkey2str(keys)
win = keys['window']
keys['window'] = win.epath if win.kind_of?(TkWindow)
end
args.push(keys) if keys
tk_call(@path, 'create', 'window', *args)
end
private :create_self