diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-01-07 05:28:53 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-01-07 05:28:53 +0000 |
| commit | 23a6ab1248f27a30c53e7395f8120a37a584e819 (patch) | |
| tree | 6d388a246fc28bbdd4cb1692515b2cd7df4d4f98 /ext/tk/lib/tkcanvas.rb | |
| parent | 9e27f947d6f7b33ebcfd7f7406d0d5be8ff1fc84 (diff) | |
| download | ruby-23a6ab1248f27a30c53e7395f8120a37a584e819.tar.gz ruby-23a6ab1248f27a30c53e7395f8120a37a584e819.tar.xz ruby-23a6ab1248f27a30c53e7395f8120a37a584e819.zip | |
* ext/tk/lib/tk.rb: use epath for embedded windows of TkPanedWindow.
* ext/tk/lib/tktext.rb: use epath for embedded windows.
* ext/tk/lib/tkcanvas.rb: use epath for window items.
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@5398 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tkcanvas.rb')
| -rw-r--r-- | ext/tk/lib/tkcanvas.rb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/ext/tk/lib/tkcanvas.rb b/ext/tk/lib/tkcanvas.rb index 32b5ac7af..ccb02c056 100644 --- a/ext/tk/lib/tkcanvas.rb +++ b/ext/tk/lib/tkcanvas.rb @@ -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 |