mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
17e1936d8b
* TkToplevel, TkFrame, TkPanedwindow, TkOptionDB : bug fix * TkOptionDB : make it more secure to use procs defined on resourceDB sample/tkoptdb.rb, sample/resource.ja, sample/resource.en : * sample script how to use TkOptionDB. resource.ja and resource.en are samples of resource definition file which are read by tkoptdb.rb. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3998 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
12 lines
417 B
Text
12 lines
417 B
Text
#
|
|
# see Tcl/Tk's "options" manual for "Database Name" and "Database Class"
|
|
#
|
|
*BtnFrame.borderWidth: 5
|
|
*BtnFrame.relief: ridge
|
|
*BtnFrame.Button.background: wheat
|
|
*BtnFrame.Button.foreground: red
|
|
*hello.text: HELLO
|
|
*quit.text: QUIT
|
|
*BTN_CMD.show_msg: {|arg| print "($SAFE=#{$SAFE}) ";\
|
|
print "Hello!! This is a sample of #{arg}.\n"}
|
|
*BTN_CMD.bye_msg: {print "($SAFE=#{$SAFE}) Good-bye¡¥\n"}
|