From: Philip Mler <me / alienemperor.de> Subject: BLT::Tabnotebook - tabnotebook.tcl not found Date: Sat, 22 Nov 2008 03:57:43 +0900 Message-ID: <caea0cee3b4ab89f3e99b5804ae0b4f5 / ruby-forum.com> > I tried to use BLT::Tabnotebook to put my existing Tk components in > Tabs, but it just doesn't work. I'm very sorry. Probably, it depends on a bug on tkextlib/blt.rb. Please try the following patch. Index: blt/vector.rb =================================================================== --- blt/vector.rb (revision 20298) +++ blt/vector.rb (working copy) @@ -49,11 +49,11 @@ size = size.join(':') end if size - @id = INTERP._invoke('::blt::vector', 'create', #auto(#{size})", *hash_kv(keys)) + @id = TkCore::INTERP._invoke('::blt::vector', 'create', #auto(#{size})", *hash_kv(keys))else - @id = INTERP._invoke('::blt::vector', 'create', #auto", *hash_kv(keys)) + @id = TkCore::INTERP._invoke('::blt::vector', 'create', #auto", *hash_kv(keys)) end TkVar_ID_TBL.mutex.synchronize{ @@ -68,7 +68,7 @@ @trace_opts = nil # teach Tk-ip that @id is global var - INTERP._invoke_without_enc('global', @id) + TkCore::INTERP._invoke_without_enc('global', @id) end def destroy @@ -250,7 +250,7 @@ @trace_opts = nil # teach Tk-ip that @id is global var - INTERP._invoke_without_enc('global', @id) + TkCore::INTERP._invoke_without_enc('global', @id) end end end Index: blt.rb =================================================================== --- blt.rb (revision 20298) +++ blt.rb (working copy) @@ -26,14 +26,14 @@ PATCH_LEVEL = tk_call('set', 'blt_patchLevel') begin - lib = INTERP._invoke('set', 'blt_library') + lib = TkCore::INTERP._invoke('set', 'blt_library') rescue lib = '' end LIBRARY = TkVarAccess.new('blt_library', lib) begin - lib = INTERP._invoke('set', 'blt_libPath') + lib = TkCore::INTERP._invoke('set', 'blt_libPath') rescue lib = '' end -- idetoshi NAGAI (nagai / ai.kyutech.ac.jp)