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 | |
| 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
| -rw-r--r-- | ChangeLog | 8 | ||||
| -rw-r--r-- | ext/tk/lib/tk.rb | 5 | ||||
| -rw-r--r-- | ext/tk/lib/tk/menu.rb | 2 |
3 files changed, 13 insertions, 2 deletions
@@ -1,3 +1,11 @@ +Thu Aug 19 16:29:45 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> + + * 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. + Thu Aug 19 15:15:24 2004 Yukihiro Matsumoto <matz@ruby-lang.org> * dir.c (free_dir): fix memory leak. reported by yamamoto 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 diff --git a/ext/tk/lib/tk/menu.rb b/ext/tk/lib/tk/menu.rb index 4b94ccd91..2b4c8bcd9 100644 --- a/ext/tk/lib/tk/menu.rb +++ b/ext/tk/lib/tk/menu.rb @@ -340,7 +340,7 @@ module TkSystemMenu # fail ArgumentError, "parent must be a TkMenu object" #end # @path = Kernel.format("%s.%s", parent.path, self.class::SYSMENU_NAME) - @path = parent_path + '.' + self.class::SYSMENU_NAME + @path = parent.path + '.' + self.class::SYSMENU_NAME #TkComm::Tk_WINDOWS[@path] = self TkCore::INTERP.tk_windows[@path] = self if self.method(:create_self).arity == 0 |