ffi-tk 2009.12.14 → 2010.01

data/lib/ffi-tk/widget/tile/panedwindow.rb

@@ -3,7 +3,59 @@ module Tk
     class PanedWindow < Tk::PanedWindow
       def self.tk_command; 'ttk::panedwindow'; end
       include TileWidget
+
+      # pathname add subwindow options...
+      # Adds a new pane to the window.
+      # subwindow must be a direct child of the paned window pathname.
+      # See PANE OPTIONS for the list of available options.
+      def add(subwindow, options = {})
+        execute_only(:add, subwindow, options.to_tcl_options)
+      end
+
+      # pathname forget pane
+      # Removes the specified subpane from the widget.
+      # pane is either an integer index or the name of a managed subwindow.
+      def forget(pane)
+        execute_only(:forget, pane)
+      end
+
+      # pathname identify x y
+      # Returns the index of the sash at point x,y, or the empty string if x,y
+      # is not over a sash.
+      def identify(x, y)
+        execute(:identify, x, y)
+      end
+
+      # pathname insert pos subwindow options...
+      # Inserts a pane at the specified position.
+      # pos is either the string end, an integer index, or the name of a managed
+      # subwindow. If subwindow is already managed by the paned window, moves it
+      # to the specified position.
+      # See PANE OPTIONS for the list of available options.
+      def insert(pos, subwindow, options = {})
+        execute_only(:insert, pos, subwindow, options.to_tcl_options)
+      end
+
+      # pathname pane pane -option ?value ?-option value...
+      # Query or modify the options of the specified pane, where pane is either
+      # an integer index or the name of a managed subwindow.
+      # If no -option is specified, returns a dictionary of the pane option
+      # values. If one -option is specified, returns the value of that option.
+      # Otherwise, sets the -options to the corresponding values.
+      def pane(pane, options = {})
+        common_configure([:pane, pane], options)
+      end
+
+      # pathname sashpos index ?newpos?
+      # If newpos is specified, sets the position of sash number index.
+      # May adjust the positions of adjacent sashes to ensure that positions are
+      # monotonically increasing.
+      # Sash positions are further constrained to be between 0 and the total
+      # size of the widget.
+      # Returns the new position of sash number index.
+      def sashpos(index, newpos = None)
+        execute(:sashpos, index, newpos)
+      end
     end
   end
 end
-

data/lib/ffi-tk/widget/tile/sizegrip.rb

@@ -17,8 +17,8 @@ module Tk
       # BUG: http://tcl.activestate.com/man/tcl8.5/TkCmd/ttk_sizegrip.htm
       # If the containing toplevel's position was specified relative to the
       # right or bottom of the screen (e.g., 'wm geometry ... wxh-x-y' instead
-      # of “wm geometry ... wxh+x+y”), the sizegrip widget will not resize the
-      # window. ttk::sizegrip widgets only support “southeast” resizing.
+      # of "wm geometry ... wxh+x+y"), the sizegrip widget will not resize the
+      # window. ttk::sizegrip widgets only support "southeast" resizing.
     end
   end
 end

data/lib/ffi-tk/widget/tile/style.rb

@@ -103,7 +103,7 @@ module Tk
       # Returns the value specified for -option in style style in state
       # state, using the standard lookup rules for element options.
       # state is a list of state names; if omitted, it defaults to all
-      # bits off (the “normal” state). If the default argument is present,
+      # bits off (the "normal" state). If the default argument is present,
       # it is used as a fallback value in case no specification
       # for -option is found.
       def self.lookup(style, option, state=Tk::None, default=Tk::None)

data/lib/ffi-tk/widget/tile/treeview.rb

@@ -217,6 +217,10 @@ module Tk
           tk_parent.children(id, *new_children)
         end
 
+        def selection_set
+          tk_parent.selection_set(id)
+        end
+
         def selection_add
           tk_parent.selection_add(id)
         end
@@ -322,12 +326,12 @@ module Tk
 
       # Returns the list of selected items.
       def selection
-        execute(:selection).to_a
+        execute(:selection).to_a.map{|id| Item.new(self, id) }
       end
 
       # +items+ becomes the new selection.
       def selection_set(*items)
-        execute(:selection, set, *items.flatten)
+        execute(:selection, :set, *items.flatten)
       end
 
       # Add +items+ to the selection

data/spec/ffi-tk/command/bind.rb

@@ -0,0 +1,25 @@
+require_relative '../../helper'
+
+describe Tk::Bind do
+  entry = Tk::Entry.new
+  entry.pack
+  entry.focus
+
+  it 'should bind a block' do
+    foo = false
+    entry.bind('f'){ foo = true }
+    Tk.interp.do_events_until{
+      Tk::Event.generate(entry, 'f')
+      foo
+    }
+    foo.should == true
+  end
+
+  it 'should return the bound proc' do
+    entry.bind('f').should == ' ::RubyFFI::event 0 f %# %b %c %d %f %h %i %k %m %o %p %s %t %w %x %y %A %B %D %E %K %N %P %R %S %T %W %X %Y '
+  end
+
+  it 'should list the sequences bound' do
+    entry.bind.should == ['f']
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: ffi-tk
 version: !ruby/object:Gem::Version 
-  version: 2009.12.14
+  version: "2010.01"
 platform: ruby
 authors: 
 - Michael 'manveru' Fellinger
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-12-14 00:00:00 +09:00
+date: 2010-01-30 00:00:00 +09:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -20,7 +20,7 @@ dependencies:
     requirements: 
     - - ~>
       - !ruby/object:Gem::Version 
-        version: 0.5.1
+        version: 0.5.4
     version: 
 - !ruby/object:Gem::Dependency 
   name: bacon
@@ -41,6 +41,8 @@ extensions: []
 extra_rdoc_files: []
 
 files: 
+- .gitignore
+- AUTHORS
 - CHANGELOG
 - MANIFEST
 - README.md
@@ -62,6 +64,7 @@ files:
 - example/tile/kroc_rb_demo.rb
 - example/tile/notebook.rb
 - example/tile/theme_hello.rb
+- example/tile/themes.rb
 - example/tile/treeview.rb
 - example/tkgo.rb
 - example/various.rb
@@ -117,6 +120,7 @@ files:
 - lib/ffi-tk/thread_sender.rb
 - lib/ffi-tk/tk.rb
 - lib/ffi-tk/variable.rb
+- lib/ffi-tk/version.rb
 - lib/ffi-tk/widget.rb
 - lib/ffi-tk/widget/button.rb
 - lib/ffi-tk/widget/canvas.rb
@@ -167,6 +171,7 @@ files:
 - lib/ffi-tk/widget/tile/style.rb
 - lib/ffi-tk/widget/tile/treeview.rb
 - lib/ffi-tk/widget/toplevel.rb
+- spec/ffi-tk/command/bind.rb
 - spec/ffi-tk/command/bindtags.rb
 - spec/ffi-tk/command/clipboard.rb
 - spec/ffi-tk/command/font.rb