diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-11-02 10:12:20 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-11-02 10:12:20 +0000 |
commit | 1a380fc6fe725f7bdf183ba91abe15ee937c0619 (patch) | |
tree | e1988eba496e43e4764e493876c08388bce71a23 /ext/tk | |
parent | 64b089b4fcb35ce62b952fb56d7b45567a4ed0ee (diff) |
* ext/tk/sample/demos-jp/widget: make the root window lower than the
sub-demos windows.
* ext/tk/sample/demos-en/widget: ditto.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@9494 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk')
-rw-r--r-- | ext/tk/sample/demos-en/widget | 8 | ||||
-rw-r--r-- | ext/tk/sample/demos-jp/widget | 8 |
2 files changed, 12 insertions, 4 deletions
diff --git a/ext/tk/sample/demos-en/widget b/ext/tk/sample/demos-en/widget index b57f260f6e..4f841b9c48 100644 --- a/ext/tk/sample/demos-en/widget +++ b/ext/tk/sample/demos-en/widget @@ -812,14 +812,15 @@ end # def aboutBox Tk.messageBox('icon'=>'info', 'type'=>'ok', 'title'=>'About Widget Demo', - 'message'=>"Ruby/Tk widget demonstration Ver.1.5.4-en\n\n" + + 'message'=>"Ruby/Tk widget demonstration Ver.1.5.5-en\n\n" + "based on demos of Tk8.1 -- 8.5 " + "( Copyright:: " + "(c) 1996-1997 Sun Microsystems, Inc. / " + "(c) 1997-2000 Ajuba Solutions, Inc. / " + "(c) 2001-2003 Donal K. Fellows )\n\n" + "Your Ruby & Tk Version ::\n" + - "Ruby#{RUBY_VERSION}(#{RUBY_RELEASE_DATE})[#{RUBY_PLATFORM}] / Tk#{$tk_patchlevel}#{(Tk::JAPANIZED_TK)? '-jp': ''}") + "Ruby#{RUBY_VERSION}(#{RUBY_RELEASE_DATE})[#{RUBY_PLATFORM}] / Tk#{$tk_patchlevel}#{(Tk::JAPANIZED_TK)? '-jp': ''}\n\n" + + "Ruby/Tk release date :: tcltklib #{TclTkLib::RELEASE_DATE}; tk #{Tk::RELEASE_DATE}") end ######################################### @@ -828,6 +829,9 @@ no_launcher = false if ARGV[0] == '-n' ARGV.shift no_launcher = true if ARGV.size > 0 +else + # show the root widget to make it lower then demo windows + Tk.update end ARGV.each{|cmd| if cmd =~ /(.*).rb/ diff --git a/ext/tk/sample/demos-jp/widget b/ext/tk/sample/demos-jp/widget index ec9a07d778..070e513dc1 100644 --- a/ext/tk/sample/demos-jp/widget +++ b/ext/tk/sample/demos-jp/widget @@ -842,14 +842,15 @@ end # def aboutBox Tk.messageBox('icon'=>'info', 'type'=>'ok', 'title'=>'About Widget Demo', - 'message'=>"Ruby/Tk ウィジェットデモ Ver.1.5.4-jp\n\n" + + 'message'=>"Ruby/Tk ウィジェットデモ Ver.1.5.5-jp\n\n" + "based on demos of Tk8.1 -- 8.5 " + "( Copyright:: " + "(c) 1996-1997 Sun Microsystems, Inc. / " + "(c) 1997-2000 Ajuba Solutions, Inc. / " + "(c) 2001-2003 Donal K. Fellows )\n\n" + "Your Ruby & Tk Version ::\n" + - "Ruby#{RUBY_VERSION}(#{RUBY_RELEASE_DATE})[#{RUBY_PLATFORM}] / Tk#{$tk_patchlevel}#{(Tk::JAPANIZED_TK)? '-jp': ''}") + "Ruby#{RUBY_VERSION}(#{RUBY_RELEASE_DATE})[#{RUBY_PLATFORM}] / Tk#{$tk_patchlevel}#{(Tk::JAPANIZED_TK)? '-jp': ''}\n\n" + + "Ruby/Tk release date :: tcltklib #{TclTkLib::RELEASE_DATE}; tk #{Tk::RELEASE_DATE}") end #################################### @@ -858,6 +859,9 @@ no_launcher = false if ARGV[0] == '-n' ARGV.shift no_launcher = true if ARGV.size > 0 +else + # show the root widget to make it lower then demo windows + Tk.update end ARGV.each{|cmd| if cmd =~ /(.*).rb/ |