From f92a3958e397da3df239b250b48063ee7e76a198 Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 2 Dec 2004 16:59:02 +0000
Subject: * ext/tk/lib/tk.rb: widget configuration by TkWindow#method_missing  
 returns proper object. "widget.option = val" returns val, and  
 "widget.option(val)" returns self. * ext/tk/lib/tk/font.rb: TkFont#replace
 accepts only one font argument. * ext/tk/lib/tk/radiobutton.rb: add
 TkRadiobutton#value and value=(val). * ext/tk/lib/tk/spinbox.rb: callback
 substitution support on command option. * ext/tk/sample/demos-en/widget: bug
 fix (wrong image height) * ext/tk/sample/demos-jp/widget: ditto.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@7442 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/sample/demos-en/widget | 4 ++--
 ext/tk/sample/demos-jp/widget | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

(limited to 'ext/tk/sample')

diff --git a/ext/tk/sample/demos-en/widget b/ext/tk/sample/demos-en/widget
index 133d151d4..9d970435a 100644
--- a/ext/tk/sample/demos-en/widget
+++ b/ext/tk/sample/demos-en/widget
@@ -72,7 +72,7 @@ EOD
 end
 
 if $tk_major_ver >= 8
-$image['print'] = TkPhotoImage.new(:height=>16, :format=>'GIF', :data=><<EOD)
+$image['print'] = TkPhotoImage.new(:height=>19, :format=>'GIF', :data=><<EOD)
     R0lGODlhGgATAPcAACEQOTEpQjEpUkIpc0IxY0I5c0oxjEo5SlJCY1JCe1JK
     UlpChFpCjFpGkFpSc1paa2NKc2NKnGNja2tapWtjc29KnHNanHNjc3NjrXNr
     jHNrnHNzc3tjpXtrtXtzhICAgIRzvYSEjIZzqox7tYyEnIyMjJSEtZSEvZSM
@@ -780,7 +780,7 @@ end
 #
 def aboutBox
   Tk.messageBox('icon'=>'info', 'type'=>'ok', 'title'=>'About Widget Demo', 
-                'message'=>"Ruby/Tk widget demonstration Ver.1.4.3-en\n\n" + 
+                'message'=>"Ruby/Tk widget demonstration Ver.1.4.4-en\n\n" + 
                            "based on demos of Tk8.1 -- 8.5  " + 
                            "( Copyright:: " + 
                            "(c) 1996-1997 Sun Microsystems, Inc. / " + 
diff --git a/ext/tk/sample/demos-jp/widget b/ext/tk/sample/demos-jp/widget
index e8196aec8..6eaaece4c 100644
--- a/ext/tk/sample/demos-jp/widget
+++ b/ext/tk/sample/demos-jp/widget
@@ -86,7 +86,7 @@ EOD
 end
 
 if $tk_major_ver >= 8
-$image['print'] = TkPhotoImage.new(:height=>16, :format=>'GIF', :data=><<EOD)
+$image['print'] = TkPhotoImage.new(:height=>19, :format=>'GIF', :data=><<EOD)
     R0lGODlhGgATAPcAACEQOTEpQjEpUkIpc0IxY0I5c0oxjEo5SlJCY1JCe1JK
     UlpChFpCjFpGkFpSc1paa2NKc2NKnGNja2tapWtjc29KnHNanHNjc3NjrXNr
     jHNrnHNzc3tjpXtrtXtzhICAgIRzvYSEjIZzqox7tYyEnIyMjJSEtZSEvZSM
@@ -807,7 +807,7 @@ end
 #
 def aboutBox
   Tk.messageBox('icon'=>'info', 'type'=>'ok', 'title'=>'About Widget Demo', 
-                'message'=>"Ruby/Tk ウィジェットデモ Ver.1.4.3-jp\n\n" + 
+                'message'=>"Ruby/Tk ウィジェットデモ Ver.1.4.4-jp\n\n" + 
                            "based on demos of Tk8.1 -- 8.5  " + 
                            "( Copyright:: " + 
                            "(c) 1996-1997 Sun Microsystems, Inc. / " + 
-- 
cgit