diff options
Diffstat (limited to 'ext/tk/lib/tk/bindtag.rb')
-rw-r--r-- | ext/tk/lib/tk/bindtag.rb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/tk/lib/tk/bindtag.rb b/ext/tk/lib/tk/bindtag.rb index d309ea6423..adf96b9e3d 100644 --- a/ext/tk/lib/tk/bindtag.rb +++ b/ext/tk/lib/tk/bindtag.rb @@ -26,7 +26,8 @@ class TkBindTag end def initialize(*args, &b) - @id = Tk_BINDTAG_ID.join('') + # @id = Tk_BINDTAG_ID.join('') + @id = Tk_BINDTAG_ID.join(TkCore::INTERP._ip_id_) Tk_BINDTAG_ID[1].succ! BTagID_TBL[@id] = self bind(*args, &b) if args != [] |