From e36f128f09cec6b0feab6adabc57d72f8ed5ccba Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 17 Sep 2004 06:05:33 +0000
Subject: * ext/tcltklib/tcltklib.c: fix SEGV when (thread_)vwait or
 (thread_)tkwait * ext/tk/lib/tk.rb: add alias wait_window to wait_destroy *
 ext/tk/lib/multi-tk.rb: support calling 'mainloop' on slave interpreters  
 (however, the 'real' eventloop must be run on the Default Master IP) *
 ext/tk/lib/remote-tk.rb: follow the changes of ext/tk/lib/multi-tk.rb *
 ext/tk/sample/remote-ip_sample2.rb: ditto * ext/tk/sample/tkoptdb-safeTk.rb:
 ditto

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@6916 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tk.rb | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'ext/tk/lib/tk.rb')

diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index e6a4dd14e..499d71d87 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -3756,15 +3756,24 @@ class TkWindow<TkObject
       INTERP._invoke('tkwait', 'window', epath)
     end
   end
+  alias wait_window wait_destroy
   def eventloop_wait_destroy
     wait_destroy(false)
   end
+  alias eventloop_wait_window eventloop_wait_destroy
   def thread_wait_destroy
     wait_destroy(true)
   end
+  alias thread_wait_window thread_wait_destroy
+
   alias tkwait_destroy wait_destroy
+  alias tkwait_window wait_destroy
+
   alias eventloop_tkwait_destroy eventloop_wait_destroy
+  alias eventloop_tkwait_window eventloop_wait_destroy
+
   alias thread_tkwait_destroy thread_wait_destroy
+  alias thread_tkwait_window thread_wait_destroy
 
   def bindtags(taglist=nil)
     if taglist
-- 
cgit