From 19d174657f1c13179e8fe0bf4e922d38d0a9c810 Mon Sep 17 00:00:00 2001 From: nagai Date: Tue, 18 Apr 2006 08:43:10 +0000 Subject: * ext/tk/lib/multi-tk.rb: add a binding to a container for a slave IP. * ext/tk/lib/tk.rb: update RELEASE_DATE. * ext/tk/tcltklib.c: forget to reset a Tcl interpreter. * ext/tk/stubs.c: fix potential bugs about handling rb_argv0. git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@10096 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/tk/lib/multi-tk.rb | 1 + ext/tk/lib/tk.rb | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) (limited to 'ext/tk/lib') diff --git a/ext/tk/lib/multi-tk.rb b/ext/tk/lib/multi-tk.rb index 84c2322d5..8fc99dff7 100644 --- a/ext/tk/lib/multi-tk.rb +++ b/ext/tk/lib/multi-tk.rb @@ -944,6 +944,7 @@ class MultiTkIp dup_keys['fill'] = :both unless dup_keys.key?('fill') dup_keys['expand'] = true unless dup_keys.key?('expand') c = TkFrame.new(top, :container=>true).pack(dup_keys) + c.bind('Destroy', proc{top.destroy}) # return keys loadTk_keys['use'] = TkWinfo.id(c) diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb index bf053058d..45468a3bf 100644 --- a/ext/tk/lib/tk.rb +++ b/ext/tk/lib/tk.rb @@ -4559,7 +4559,7 @@ end #Tk.freeze module Tk - RELEASE_DATE = '2006-04-06'.freeze + RELEASE_DATE = '2006-04-18'.freeze autoload :AUTO_PATH, 'tk/variable' autoload :TCL_PACKAGE_PATH, 'tk/variable' -- cgit