diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-08-19 07:43:54 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-08-19 07:43:54 +0000 |
| commit | d7c0ba703aed19de0275d37d725847aae43b06ae (patch) | |
| tree | c849f32b115ae050f1851362f81859278b2f89eb /ext/tk/lib/tk.rb | |
| parent | 76a30a1e3e817678c5311efb404a6e8d71c16b6d (diff) | |
| download | ruby-d7c0ba703aed19de0275d37d725847aae43b06ae.tar.gz ruby-d7c0ba703aed19de0275d37d725847aae43b06ae.tar.xz ruby-d7c0ba703aed19de0275d37d725847aae43b06ae.zip | |
* ext/tk/lib/tk.rb: Fail to treat a hash value of 'font' option.
* ext/tk/lib/tk.rb: bindinfo cannot return '%' substiturion infomation.
* ext/tk/lib/menu.rb: typo bug.
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@6795 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tk.rb')
| -rw-r--r-- | ext/tk/lib/tk.rb | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb index e91ba92df..800031a68 100644 --- a/ext/tk/lib/tk.rb +++ b/ext/tk/lib/tk.rb @@ -840,7 +840,7 @@ module TkComm def _bindinfo(what, context=nil) if context tk_call_without_enc(*what+["<#{tk_event_sequence(context)}>"]) .collect {|cmdline| - if cmdline =~ /^rb_out\S* (c(_\d+_)?\d+)\s+(.*)$/ + if cmdline =~ /^rb_out\S* (c(?:_\d+_)?\d+)\s+(.*)$/ #[Tk_CMDTBL[$1], $2] [TkCore::INTERP.tk_cmd_tbl[$1], $2] else @@ -2124,6 +2124,7 @@ module TkTreatFont *(__config_cmd << {})) next else + fnt = hash_kv(fnt) if fnt.kind_of?(Hash) tk_call(*(__config_cmd << "-#{optkey}" << fnt)) end end @@ -2177,6 +2178,7 @@ module TkTreatFont elsif Tk::JAPANIZED_TK fobj = fontobj # create a new TkFont object else + ltn = hash_kv(ltn) if ltn.kind_of?(Hash) tk_call(*(__config_cmd << "-#{optkey}" << ltn)) next end @@ -2228,6 +2230,7 @@ module TkTreatFont elsif Tk::JAPANIZED_TK fobj = fontobj # create a new TkFont object else + knj = hash_kv(knj) if knj.kind_of?(Hash) tk_call(*(__config_cmd << "-#{optkey}" << knj)) next end |