diff options
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rw-r--r-- | ext/tk/lib/tk/variable.rb | 4 |
2 files changed, 7 insertions, 2 deletions
@@ -1,3 +1,8 @@ +Tue Oct 13 18:54:25 2009 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> + + * ext/tk/variable.rb: bug fix. additional trace definition changes the + option of first trace definition. + Tue Oct 13 18:23:17 2009 Nobuyoshi Nakada <nobu@ruby-lang.org> * parse.y (token_info_push, token_info_pop): reduced ifdefs. diff --git a/ext/tk/lib/tk/variable.rb b/ext/tk/lib/tk/variable.rb index ee60fcfc6c..6a618e7ee8 100644 --- a/ext/tk/lib/tk/variable.rb +++ b/ext/tk/lib/tk/variable.rb @@ -1375,7 +1375,7 @@ end if @trace_opts == nil TkVar_CB_TBL[@id] = self - @trace_opts = opts + @trace_opts = opts.dup if USE_OLD_TRACE_OPTION_STYLE Tk.tk_call_without_enc('trace', 'variable', @id, @trace_opts, 'rb_var ' << @id) @@ -1421,7 +1421,7 @@ end if @trace_opts == nil TkVar_CB_TBL[@id] = self - @trace_opts = opts + @trace_opts = opts.dup if USE_OLD_TRACE_OPTION_STYLE Tk.tk_call_without_enc('trace', 'add', 'variable', @id, @trace_opts, 'rb_var ' << @id) |