From 3dd3b2136b0050c669d0881ae804b1fae8ea6567 Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 22 Oct 2005 22:17:08 +0000
Subject: * ext/tk/extconf.rb: improbe messages [ruby-core:06325]. *
 ext/tk/lib/tk.rb, ext/tk/lib/tk/canvas.rb, ext/tk/lib/tk/entry.rb,  
 ext/tk/lib/tk/frame.rb, ext/tk/lib/tk/image.rb,  
 ext/tk/lib/tk/itemconfig.rb, ext/tk/lib/tk/labelframe.rb,  
 ext/tk/lib/tk/listbox.rb, ext/tk/lib/tk/menu.rb,  
 ext/tk/lib/tk/radiobutton.rb, ext/tk/lib/tk/scale.rb,  
 ext/tk/lib/tk/spinbox.rb, ext/tk/lib/tk/text.rb,   ext/tk/lib/tk/toplevel.rb:
 improve conversion of option values. * ext/tk/lib/tkextlib/*: ditto. *
 ext/tk/lib/tkextlib/*: update to support ActiveTcl8.4.11.2. *
 ext/tk/lib/tkextlib/trofs/*: support Trofs 0.4.3. *
 ext/tk/lib/tkextlib/tile/*: support Tile 0.7.2. * ext/tk/lib/tkextlib/vu/*:
 support vu 2.3.0. * ext/tk/lib/tkextlib/tcllib/*: support Tcllib 1.8 (Tklib
 0.3).

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9448 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tkextlib/tktable/tktable.rb | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

(limited to 'ext/tk/lib/tkextlib/tktable/tktable.rb')

diff --git a/ext/tk/lib/tkextlib/tktable/tktable.rb b/ext/tk/lib/tkextlib/tktable/tktable.rb
index 59328a8f6e..4edaabc847 100644
--- a/ext/tk/lib/tkextlib/tktable/tktable.rb
+++ b/ext/tk/lib/tkextlib/tktable/tktable.rb
@@ -59,6 +59,21 @@ module Tk::TkTable::ConfigMethod
   end
   private :__item_pathname
 
+  def __item_boolval_optkeys(id)
+    super(id) << 'multiline' << 'showtext' << 'wrap'
+  end
+  private :__item_boolval_optkeys
+
+  def __item_strval_optkeys(id)
+    super(id) << 'ellipsis'
+  end
+  private :__item_strval_optkeys
+
+  def __item_val2ruby_optkeys(id)  # { key=>method, ... }
+    super(id).update('window'=>proc{|v| window(v)})
+  end
+  private :__item_val2ruby_optkeys
+
   def tag_cget(tagOrId, option)
     itemcget(['tag', tagid(tagOrId)], option)
   end
@@ -208,6 +223,18 @@ class Tk::TkTable
     Tk::TkTable::CelTag::CellTagID_TBL.delete(@path)
   end
 
+  def __boolval_optkeys
+    super() << 'autoclear' << 'flashmode' << 'invertselected' <<
+      'multiline' << 'selecttitle' << 'wrap'
+  end
+  private :__boolval_optkeys
+
+  def __strval_optkeys
+    super() << 'colseparator' << 'ellipsis' << 'rowseparator' << 'sparsearray'
+  end
+  private :__strval_optkeys
+
+
   #################################
 
   class BrowseCommand < TkValidateCommand
-- 
cgit v1.2.3