summaryrefslogtreecommitdiffstats
path: root/ext/tk/lib/tkcanvas.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/lib/tkcanvas.rb')
-rw-r--r--ext/tk/lib/tkcanvas.rb7
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