summaryrefslogtreecommitdiff
path: root/ext/tk/sample/demos-jp/msgbox2.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/sample/demos-jp/msgbox2.rb')
-rw-r--r--ext/tk/sample/demos-jp/msgbox2.rb4
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 d61f25129a..e2944c59ed 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}\"タイプのメッセージボックス",