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.



1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
# File 'lib/a-tkcommons.rb', line 1201

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