* ext/tk/tcltklib.c: [trial patch] On some environments, it gives

  better responce about callbacks across threads. But on the other
  environments, it has no effect. 


git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@17115 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 2 insertions, 2 deletions

diff --git a/ext/tk/sample/demos-jp/msgbox2.rb b/ext/tk/sample/demos-jp/msgbox2.rb
index d61f25129..e2944c59e 100644
--- a/ext/tk/sample/demos-jp/msgbox2.rb
+++ b/ext/tk/sample/demos-jp/msgbox2.rb
@@ -41,7 +41,7 @@ TkFrame.new(base_frame) {|frame|
 
   TkButton.new(frame) {
     text 'メッセージボックス'
-    command proc{showMessageBox $msgbox2_demo}
+    command proc{showMessageBox2 $msgbox2_demo}
   }.pack('side'=>'left', 'expand'=>'yes')
 }.pack('side'=>'bottom', 'fill'=>'x', 'pady'=>'2m')
 
@@ -78,7 +78,7 @@ $msgboxType = TkVariable.new('ok')
                                         'anchor'=>'w', 'fill'=>'x')
 }
 
-def showMessageBox(w)
+def showMessageBox2(w)
   button = Tk.messageBox('icon'=>$msgboxIcon.value, 'type'=>$msgboxType.value, 
                          'title'=>'Message', 'parent'=>w,
                          'message'=>"\"#{$msgboxType.value}\"タイプのメッセージボックス",