Class: TkBuffersChoise

Inherits:
TkBuffersChoiseView show all
Defined in:
lib/a-tkcommons.rb

Instance Method Summary collapse

Constructor Details

#initializeTkBuffersChoise

Returns a new instance of TkBuffersChoise.



1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
# File 'lib/a-tkcommons.rb', line 1879

def initialize
  super
  @lb.value= $arcadia['buffers.code.in_memory'].keys
  @lb.bind("Double-ButtonPress-1",proc{
    _sel = @lb.get('active')
    Revparsel.new($arcadia['buffers.code.in_memory'][_sel])
    @lb.delete('active')
    $arcadia['buffers.code.in_memory'].delete(_sel)
    destroy
  })
  raise
end