rbcurse 1.1.5 → 1.2.0.pre

data/examples/testvimsplit.rb

@@ -0,0 +1,111 @@
+# This is a new kind of splitpane, inspired by the vim editor.
+# I was deeply frustrated with the Java kind of splitpane,
+# which requires splitpanes within splitpanes to get several split.
+# This is an attempt at getting many splits, keeping them at one level
+# and keeping the interface as simple as possible, with minimal input
+# from user.
+# It usually takes a listbox or textview or textarea.
+# It can also take an array, or string or hash.
+# It supports moving the split, and increasing or decreasing the current box to some extent.
+# Typically if the split is vertical, add stacks the components, one below the other.
+# If horizontal, if will flow the components, to the right of previous. This can be overriden by passing 
+# type as :STACK or :FLOW.
+#
+# This does not support changing the orientation at run time, that's nice for demos, but a pain
+# to get right, and results in a lot of extra code, meaning more bugs.
+# TODO: create a class that contains component array and a pointer so it can give next/prev
+# i am tired of maintaining this everywhere.
+require 'rbcurse'
+require 'rbcurse/rlistbox'
+require 'rbcurse/rtextview'
+require 'rbcurse/rvimsplit'
+
+if $0 == __FILE__
+class Tester
+  def initialize
+    acolor = $reversecolor
+  end
+  def run
+    @window = VER::Window.root_window 
+    @form = Form.new @window
+
+    h = 20; w = 75; t = 3; l = 4
+
+    vf = :H
+    @vim = VimSplit.new @form, {:row => 2, :col => 5, :width => :EXPAND, :height => 25, :orientation => vf, :weight => 0.4}
+    lb = Listbox.new nil, :list => ["ruby","perl","lisp","jaava", "c-blunt"] , :name => "mylist"
+    lb1 = Listbox.new nil, :list => ["roger","borg","haas","tsonga", "kolya","delpotro"] , :name => "mylist1"
+    
+    lb2 = Listbox.new nil, :list => `gem list --local`.split("\n") , :name => "mylist2"
+
+    alist = %w[ ruby perl python java jruby macruby rubinius rails rack sinatra pylons django cakephp grails] 
+    str = "Hello people of this world.\nThis is a textbox.\nUse arrow keys, j/k/h/l/gg/G/C-a/C-a/C-n/C-p\n"
+    str << alist.join("\n")
+    stfl = vf == :V ? :FLOW : :STACK
+    @vim.add lb, :FIRST, :AUTO
+    @vim.add lb1, :FIRST, :AUTO #nil #0.7:AUTO
+    @vim.add ["mercury","venus","earth","mars","jupiter", "saturn"], :FIRST, :AUTO
+    @vim.add alist, :FIRST, 0.4, stfl
+    @vim.add alist.shuffle, :FIRST, nil, stfl
+    @vim.add lb2, :SECOND, :AUTO
+    @vim.add str, :SECOND, :AUTO
+      ok_button = Button.new @form do
+        text "+"
+        name "+"
+        row 27
+        col 10
+      end
+      #ok_button.command { |form| @vim.weight(@vim.weight + 0.1)  }
+      ok_button.command {  @vim.increase_weight }
+      
+
+      k_button = Button.new @form do
+        text "-"
+        name "-"
+        row 27
+        col 17
+      end
+      #k_button.command { |form| @vim.weight( @vim.weight - 0.1) }
+      k_button.command { |form| @vim.decrease_weight }
+      
+    #
+    @help = "F1 to quit. "
+    RubyCurses::Label.new @form, {'text' => @help, "row" => 1, "col" => 2, "color" => "yellow"}
+    @form.repaint
+    @window.wrefresh
+    Ncurses::Panel.update_panels
+    ctr = 0
+    row = 2
+    while((ch = @window.getchar()) != KEY_F1 )
+      ret = @form.handle_key(ch)
+      @window.wrefresh
+      #ret = @vim.handle_key ch
+      if ret == :UNHANDLED
+        str = keycode_tos ch
+        $log.debug " UNHANDLED #{str} by Vim #{ret} "
+      end
+    end
+
+    @window.destroy
+
+  end
+end
+  include RubyCurses
+  include RubyCurses::Utils
+  # Initialize curses
+  begin
+    # XXX update with new color and kb
+    VER::start_ncurses  # this is initializing colors via ColorMap.setup
+    $log = Logger.new("view.log")
+    $log.level = Logger::DEBUG
+    n = Tester.new
+    n.run
+  rescue => ex
+  ensure
+    VER::stop_ncurses
+    p ex if ex
+    puts(ex.backtrace.join("\n")) if ex
+    $log.debug( ex) if ex
+    $log.debug(ex.backtrace.join("\n")) if ex
+  end
+end

data/examples/todocsv.csv

@@ -0,0 +1,28 @@
+FIXME,MSGBOX,5,Confirm dialog: box vertical line overwritten in 2 spots,TODO
+FIXME,MSGBOX,5,Confirm dialog: use normal key as hotkey also,TODO,Tue Jan 20 11:44:49 +0530 2009
+FIXME,MSGBOX,5,Confirm dialog: arrow keys not navigating anylonger,TODO,Tue Jan 20 11:45:27 +0530 2009
+FIXME,GEN,9,Message Box sizing,TODO,Thu Jan 22 20:39:21 +0530 2009
+DONE,LIST,5,case insensitive char search in list and combo,TESTED,Sat Feb 21 20:43:05 +0530 2009
+DONE,TABLE,5,increase the maxlen of this field please. Let us see how it goes.,TESTED
+DONE,TABLE,5,Can we disable down arrow in Chkbox in table?,TESTED,Mon Jan 19 00:00:00 +0530 2009
+DONE,TABLE,0,editing on enter,TESTED,Mon Jan 19 01:37:00 +0530 2009
+DONE,TABLE,5,cell editors pcol is not being reset each time,TESTED,Mon Jan 19 17:47:00 +0530 2009
+DONE,TABLE,5,Use TAB for intercell navig. use M-TAB for next f,TESTED,Tue Jan 20 00:38:19 +0530 2009
+DONE,TABLE,5,Searching,TESTED,Sat Feb 21 20:42:10 +0530 2009
+DONE,TABLE,3,Columns editable or not,TESTED,Sat Feb 21 20:43:10 +0530 2009
+DONE,TABLE,1,Any way to start a table with no data and pop late,TODO,Sat Feb 21 20:43:33 +0530 2009
+DONE,GEN,5,Make  widget of Keylabelprinter,TESTED,Tue Jan 20 00:38:43 +0530 2009
+DONE,GEN,5,Added Action class shared by Button Menuitem ,TESTED,Thu Jan 22 18:08:28 +0530 2009
+DONE,GEN,5,Added PopupMenu 2009-01-22 18:09 ,TESTED,Thu Jan 22 18:09:34 +0530 2009
+DONE,LIST,0,call on_enter and on_leave of component,TOTEST,Sun Feb 22 12:19:38 +0530 2009
+DONE,FIELD,5,Field: OVERWRITE Mode,TESTED,2010-09-13 11:24:35 +0530
+DONE,GEN,5,"Modified should check if value changed, not UP etc",TOTEST,2010-09-13 11:25:18 +0530
+TODO,TABLE,1,table.set_data should check if models already created.,TODO
+TODO,TABLE,5,"Set column_class in TableColumn, to avoid hassles",TODO
+TODO,TABLE,2,Table sorting and filtering is required - using VIEW,TODO
+TODO,TABLE,5,Table height and col widths auto sizing or FILLING extra space.,TODO
+TODO,TEXTAREA,9,"Textarea: wrap options NONE, COLUMN",TODO,Tue Jan 20 01:04:15 +0530 2009
+TODO,GEN,5,Give a decent FileChooser and FileSaver,TODO
+TODO,GEN,5,Focus Traversable vs focusable,TODO
+TODO,GEN,5,Action class: fire event for listeners,TODO,Thu Jan 22 20:09:50 +0530 2009
+TODO,FIELD,5,Field: Auto-skip when reaching end of maxlen,TODO

data/examples/viewtodo.rb

@@ -5,7 +5,7 @@ require 'logger'
 require 'rbcurse'
 require 'rbcurse/rcombo'
 require 'rbcurse/rtable'
-require 'rbcurse/extras/tableextended' # TODO move to extras
+require 'rbcurse/extras/tableextended' 
 require 'rbcurse/keylabelprinter'
 require 'rbcurse/applicationheader'
 require 'rbcurse/action'
@@ -20,46 +20,50 @@ class Table
   # so we can increase and decrease column width using keys
   include TableExtended
 end
-class TodoList
-  def initialize file
-    @file = file
-  end
-  def load 
-    #@todomap = YAML::load(File.open(@file));
-    @db = SQLite3::Database.new(@file)
-    #@records = convert_to_text
-  end
-  # get columns and datatypes, prefetch - copied from sqlc.rb
-  def get_data command
-    @columns, *rows = @db.execute2(command)
-    @content = rows
-    return nil if @content.nil? or @content[0].nil?
-    @datatypes = @content[0].types #if @datatypes.nil?
-    @command = command
-    return @content
-  end
-  def get_statuses
-    #@todomap['__STATUSES']
-    ## temporary due to structure change
-    #['TODO', 'TOTEST', 'TESTED'] 
-    c = get_data "select * from status"
-    c.flatten
-  end
-  def get_modules
-    #@todomap['__MODULES'].sort
-    ## temporary due to structure change
-    ['GEN', 'FIELD', 'FORM', 'TABLE']
-    #get_data "select * from status"
-  end
-  def get_categories
-    #@todomap.keys.delete_if {|k| k.match(/^__/) }
-    ## temporary due to structure change
-    #['TODO', 'FIXME','DONE']# earlier i used to keep todo items in a text file in these sections
-    c = get_data "select * from categ"
-    c.flatten
-  end
-  def get_tasks_for_category categ
-    get_data "select * from todo where categ = '#{categ}' "
+# 2010-09-13 12:00 Added module since class names are same as testtodo
+# and clashing when called from a menu
+# end
+module ViewTodo
+  class TodoList
+    def initialize file
+      @file = file
+    end
+    def load 
+      #@todomap = YAML::load(File.open(@file));
+      @db = SQLite3::Database.new(@file)
+      #@records = convert_to_text
+    end
+    # get columns and datatypes, prefetch - copied from sqlc.rb
+    def get_data command
+      @columns, *rows = @db.execute2(command)
+      @content = rows
+      return nil if @content.nil? or @content[0].nil?
+      @datatypes = @content[0].types #if @datatypes.nil?
+      @command = command
+      return @content
+    end
+    def get_statuses
+      #@todomap['__STATUSES']
+      ## temporary due to structure change
+      #['TODO', 'TOTEST', 'TESTED'] 
+      c = get_data "select * from status"
+      c.flatten
+    end
+    def get_modules
+      #@todomap['__MODULES'].sort
+      ## temporary due to structure change
+      ['GEN', 'FIELD', 'FORM', 'TABLE']
+      #get_data "select * from status"
+    end
+    def get_categories
+      #@todomap.keys.delete_if {|k| k.match(/^__/) }
+      ## temporary due to structure change
+      #['TODO', 'FIXME','DONE']# earlier i used to keep todo items in a text file in these sections
+      c = get_data "select * from categ"
+      c.flatten
+    end
+    def get_tasks_for_category categ
+      get_data "select * from todo where categ = '#{categ}' "
 =begin
     c = @todomap[categ]
     d = []
@@ -74,67 +78,67 @@ class TodoList
     }
     return d
 =end
-  end
-  # today i really don't know how this differs from previous one (records vs tasks)
-  def get_records_for_category categ
-    if categ.nil? or categ == ""
-      #return @records
-      get_data "select * from todo"
-    else
-      #return @records.select { |row| row[0] == categ }
-      get_data "select * from todo where categ = '#{categ}' "
     end
-  end
-  def sort categ, column, descending=false
-    d = get_records_for_category categ
-    d = d.sort { |y,x| 
-      if descending
-        if x[column].nil?
-          $log.debug "sort -1"
-          -1
-        elsif y[column].nil?
-          $log.debug "sort 1"
-          1
-        else
-          $log.debug "sort <> #{x[column]} <=> #{y[column]} "
-          x[column] <=> y[column] 
-        end
+    # today i really don't know how this differs from previous one (records vs tasks)
+    def get_records_for_category categ
+      if categ.nil? or categ == ""
+        #return @records
+        get_data "select * from todo"
       else
-        if x[column].nil?
-         1 
-        elsif y[column].nil?
-          -1
+        #return @records.select { |row| row[0] == categ }
+        get_data "select * from todo where categ = '#{categ}' "
+      end
+    end
+    def sort categ, column, descending=false
+      d = get_records_for_category categ
+      d = d.sort { |y,x| 
+        if descending
+          if x[column].nil?
+            $log.debug "sort -1"
+            -1
+          elsif y[column].nil?
+            $log.debug "sort 1"
+            1
+          else
+            $log.debug "sort <> #{x[column]} <=> #{y[column]} "
+            x[column] <=> y[column] 
+          end
         else
-          y[column] <=> x[column] 
+          if x[column].nil?
+            1 
+          elsif y[column].nil?
+            -1
+          else
+            y[column] <=> x[column] 
+          end
         end
+      }
+      return d
+    end
+    def set_tasks_for_category categ, data
+      d = {}
+      data.each do |row|
+        #key = row.delete_at 0
+        key = row.first
+        d[key] ||= []
+        d[key] << row[1..-1]
       end
-    }
-    return d
-  end
-  def set_tasks_for_category categ, data
-    d = {}
-    data.each do |row|
-      #key = row.delete_at 0
-      key = row.first
-      d[key] ||= []
-      d[key] << row[1..-1]
+      @todomap[categ]=d
+      $log.debug " NEW DATA #{categ}: #{data}"
     end
-    @todomap[categ]=d
-    $log.debug " NEW DATA #{categ}: #{data}"
-  end
-  def convert_to_text
-    d = []
-    cats = get_categories
-    cats.each do |c|
-      tasks = get_tasks_for_category c
-      tasks.each do |t|
-        n = t.dup
-        n.insert 0, c
-        d << n
+    def convert_to_text
+      d = []
+      cats = get_categories
+      cats.each do |c|
+        tasks = get_tasks_for_category c
+        tasks.each do |t|
+          n = t.dup
+          n.insert 0, c
+          d << n
+        end
       end
+      return d
     end
-    return d
-  end
 =begin
     File.open("todo.csv", "w") { |f| YAML.dump( d, f )}
     buf =''
@@ -147,155 +151,135 @@ class TodoList
       end
     end  
 =end
-  def dump
-    f = "#{@file}"
-    #File.open(f, "w") { |f| YAML.dump( @todomap, f )}
-    convert_to_text
-  end
-end
-def get_key_labels
-  key_labels = [
-    ['C-q', 'Exit'], nil,
-    ['M-c', 'Category'], nil,
-    ['M-f', 'Filter Fld'], ['M-p', 'Pattern'],
-    ['M-s', 'Sort'], ['M-i', 'Filter']
-  ]
-  return key_labels
-end
-def get_key_labels_table
-  key_labels = [
-    #['M-n','NewRow'], ['M-d','DelRow'],
-    ['C-x','Select'], ['M-h', 'Popup'],
-    ['M-0', 'Top'], ['M-9', 'End'],
-    ['C-p', 'PgUp'], ['C-n', 'PgDn'],
-    ['M-Tab','Nxt Fld'], ['Tab','Nxt Col'],
-    ['+','Widen'], ['-','Narrow']
-  ]
-  return key_labels
-end
-class TodoApp
-  def initialize
-    @window = VER::Window.root_window
-    @form = Form.new @window
-    @sort_dir = true
-
-    #@todo = TodoList.new "todo.yml"
-    @todo = TodoList.new "todo.db"
-    @todo.load
-  end
-  def run
-    todo = @todo
-    statuses = todo.get_statuses
-    cats = todo.get_categories
-    cats.insert 0,""
-    modules = todo.get_modules
-    title = "TODO APP"
-    @header = ApplicationHeader.new @form, title, {:text2=>"Some Text", :text_center=>"Task View"}
-    status_row = RubyCurses::Label.new @form, {'text' => "", :row => Ncurses.LINES-4, :col => 0, :display_length=>60}
-    @status_row = status_row
-    # setting ENTER across all objects on a form
-    @form.bind(:ENTER) {|f| status_row.text = f.help_text unless f.help_text.nil? }
-    #@window.printstring 0,(Ncurses.COLS-title.length)/2,title, $datacolor
-    r = 1; c = 1;
-    categ = ComboBox.new @form do
-      name "categ"
-      row r
-      col 15
-      display_length 10
-      editable false
-      list cats
-      set_label Label.new @form, {'text' => "Category", 'color'=>'cyan','col'=>1, "mnemonic"=>"C"}
-      list_config 'height' => 4
-      help_text "Select a category and <TAB> out. KEY_UP, KEY_DOWN, M-Down" 
+    def dump
+      f = "#{@file}"
+      #File.open(f, "w") { |f| YAML.dump( @todomap, f )}
+      convert_to_text
     end
-    colnames = %w[Sno Categ Module Prior Task Status Date]
+  end # class
+  class TodoApp
+    def initialize
+      @window = VER::Window.root_window
+      @form = Form.new @window
+      @sort_dir = true
 
-    colnames_cbl = colnames.dup
-    colnames_cbl.insert 0, ""
-    col_combo = ComboBox.new @form do
-      name "col_combo"
-      row r
-      col 45
-      display_length 10
-      editable false
-      list colnames_cbl
-      set_label Label.new @form, {'text' => "Filter on:", 'color'=>'cyan',"mnemonic"=>"F"}
-      list_config 'height' => 6
-      help_text "Select a field to filter on"
-    end
-    col_value = Field.new @form do
-      name "col_value"
-      row r+1
-      col 45
-      bgcolor 'cyan'
-      color 'white'
-      display_length 10
-      set_label Label.new @form, {'text' => "Pattern:", 'color'=>'cyan',:bgcolor => 'black',"mnemonic"=>"P"}
-      help_text "Pattern/Regex to filter on"
-    end
-    # prepopulate screen, else error in table
-    data = todo.get_records_for_category 'TODO' # earlier TODO
-    @data = data
-    b_filter = Button.new @form do
-      text "Fi&lter"
-      row r
-      col 65
-      help_text "Filter on selected filter column and value"
-      #bind(:ENTER) { status_row.text "New button adds a new row below current " }
+      #@todo = TodoList.new "todo.yml"
+      @todo = ViewTodo::TodoList.new "todo.db"
+      @todo.load
     end
+    def run
+      todo = @todo
+      statuses = todo.get_statuses
+      cats = todo.get_categories
+      cats.insert 0,""
+      modules = todo.get_modules
+      title = "TODO APP"
+      @header = ApplicationHeader.new @form, title, {:text2=>"Some Text", :text_center=>"Task View"}
+      status_row = RubyCurses::Label.new @form, {'text' => "", :row => Ncurses.LINES-4, :col => 0, :display_length=>60}
+      @status_row = status_row
+      # setting ENTER across all objects on a form
+      @form.bind(:ENTER) {|f| status_row.text = f.help_text unless f.help_text.nil? }
+      #@window.printstring 0,(Ncurses.COLS-title.length)/2,title, $datacolor
+      r = 1; c = 1;
+      categ = ComboBox.new @form do
+        name "categ"
+        row r
+        col 15
+        display_length 10
+        editable false
+        list cats
+        set_label Label.new @form, {'text' => "Category", 'color'=>'cyan','col'=>1, "mnemonic"=>"C"}
+        list_config 'height' => 4
+        help_text "Select a category and <TAB> out. KEY_UP, KEY_DOWN, M-Down" 
+      end
+      colnames = %w[Sno Categ Module Prior Task Status Date]
+
+      colnames_cbl = colnames.dup
+      colnames_cbl.insert 0, ""
+      col_combo = ComboBox.new @form do
+        name "col_combo"
+        row r
+        col 45
+        display_length 10
+        editable false
+        list colnames_cbl
+        set_label Label.new @form, {'text' => "Filter on:", 'color'=>'cyan',"mnemonic"=>"F"}
+        list_config 'height' => 6
+        help_text "Select a field to filter on"
+      end
+      col_value = Field.new @form do
+        name "col_value"
+        row r+1
+        col 45
+        bgcolor 'cyan'
+        color 'white'
+        display_length 10
+        set_label Label.new @form, {'text' => "Pattern:", 'color'=>'cyan',:bgcolor => 'black',"mnemonic"=>"P"}
+        help_text "Pattern/Regex to filter on"
+      end
+      # prepopulate screen, else error in table
+      data = todo.get_records_for_category 'TODO' # earlier TODO
+      @data = data
+      b_filter = Button.new @form do
+        text "Fi&lter"
+        row r
+        col 65
+        help_text "Filter on selected filter column and value"
+        #bind(:ENTER) { status_row.text "New button adds a new row below current " }
+      end
 
 
-    table_ht = 15
-    atable = Table.new @form do
-      name   "tasktable" 
-      row  r+2
-      col  c
-      width 104
-      height table_ht
-      #title "A Table"
-      #title_attrib (Ncurses::A_REVERSE | Ncurses::A_BOLD)
-      cell_editing_allowed false
-      set_data data, colnames
-    end
-    @atable = atable
-    categ.bind(:CHANGED) do |fld| $log.debug " COMBO EXIT XXXXXXXX"; 
+      table_ht = 15
+      atable = Table.new @form do
+        name   "tasktable" 
+        row  r+2
+        col  c
+        width 104
+        height table_ht
+        #title "A Table"
+        #title_attrib (Ncurses::A_REVERSE | Ncurses::A_BOLD)
+        cell_editing_allowed false
+        set_data data, colnames
+      end
+      @atable = atable
+      categ.bind(:CHANGED) do |fld| $log.debug " COMBO EXIT XXXXXXXX"; 
       data = todo.get_records_for_category fld.getvalue; 
       @data = data
       atable.table_model.data = data
-    end
-    b_filter.command { 
-      alert("Data is blank") if data.nil? or data.size == 0
-      raise("Data is blank") if data.nil? or data.size == 0
-      raise("selected is blank") if col_combo.selected_item.nil?
-      raise("col_val is blank") if col_value.getvalue.nil?
+      end
+      b_filter.command { 
+        alert("Data is blank") if data.nil? or data.size == 0
+        raise("Data is blank") if data.nil? or data.size == 0
+        raise("selected is blank") if col_combo.selected_item.nil?
+        raise("col_val is blank") if col_value.getvalue.nil?
 
-      $log.debug "#{col_combo.selected_index},   .#{col_value.getvalue}" 
-      d = data.select {|row| row[col_combo.selected_index-1].to_s.match(col_value.getvalue) }
-      atable.table_model.data = d unless d.nil? or d.size == 0
-    }
+        $log.debug "#{col_combo.selected_index},   .#{col_value.getvalue}" 
+        d = data.select {|row| row[col_combo.selected_index-1].to_s.match(col_value.getvalue) }
+        atable.table_model.data = d unless d.nil? or d.size == 0
+      }
 
-    tcm = atable.get_table_column_model
-    #
-    ## key bindings fo atable
-    # column widths 
-    x = 0
-    tcm.column(x).width 2 # RK 2010-05-11 19:59 added serial number for updating
-    x += 1
-    tcm.column(x).width 8
-    x += 1
-    tcm.column(x).width 8
-    x += 1
-    tcm.column(x).width 5
-    x += 1
-    tcm.column(x).width 50
-    x += 1
-    tcm.column(x).width 8
-    x += 1
-    tcm.column(x).width 16
-    app = self
-    atable.configure() do
-      #bind_key(330) { atable.remove_column(tcm.column(atable.focussed_col)) rescue ""  }
-      #bind_key(?+) {
+      tcm = atable.get_table_column_model
+      #
+      ## key bindings fo atable
+      # column widths 
+      x = 0
+      tcm.column(x).width 2 # RK 2010-05-11 19:59 added serial number for updating
+      x += 1
+      tcm.column(x).width 8
+      x += 1
+      tcm.column(x).width 8
+      x += 1
+      tcm.column(x).width 5
+      x += 1
+      tcm.column(x).width 50
+      x += 1
+      tcm.column(x).width 8
+      x += 1
+      tcm.column(x).width 16
+      app = self
+      atable.configure() do
+        #bind_key(330) { atable.remove_column(tcm.column(atable.focussed_col)) rescue ""  }
+        #bind_key(?+) {
         #acolumn = atable.column atable.focussed_col()
         ##num = $multiplier || 1
         #num=(($multiplier.nil? or $multiplier == 0) ? 1 : $multiplier)
@@ -303,71 +287,71 @@ class TodoApp
         #w = acolumn.width + num
         #acolumn.width w
         ##atable.table_structure_changed
-      #}
-      bind_key(?+) {
-        # this automatically takes care of numeric arguments such as 12+ 22+ etc
-        atable.increase_column
-      }
-      bind_key(?-) {
-        # this automatically takes care of numeric arguments such as 12- 22- etc
-        atable.decrease_column
-      }
-      #bind_key(?-) {
+        #}
+        bind_key(?+) {
+          # this automatically takes care of numeric arguments such as 12+ 22+ etc
+          atable.increase_column
+        }
+        bind_key(?-) {
+          # this automatically takes care of numeric arguments such as 12- 22- etc
+          atable.decrease_column
+        }
+        #bind_key(?-) {
         #acolumn = atable.column atable.focussed_col()
         #num=(($multiplier.nil? or $multiplier == 0) ? 1 : $multiplier)
         #w = acolumn.width - num
         #$multiplier = 0
         #if w > 3
-          #acolumn.width w
-          ##atable.table_structure_changed
+        #acolumn.width w
+        ##atable.table_structure_changed
         #end
-      #}
-      bind_key(?>) {
-        colcount = tcm.column_count-1
-        #atable.move_column sel_col.value, sel_col.value+1 unless sel_col.value == colcount
-        col = atable.focussed_col
-        atable.move_column col, col+1 unless col == colcount
-      }
-      bind_key(?<) {
-        col = atable.focussed_col
-        atable.move_column col, col-1 unless col == 0
-        #atable.move_column sel_col.value, sel_col.value-1 unless sel_col.value == 0
-      }
-      bind_key(?\M-h, app) {|tab,td| $log.debug " BIND... #{tab.class}, #{td.class}"; app.make_popup atable}
-    end
-    #keylabel = RubyCurses::Label.new @form, {'text' => "", "row" => r+table_ht+3, "col" => c, "color" => "yellow", "bgcolor"=>"blue", "display_length"=>60, "height"=>2}
-    #eventlabel = RubyCurses::Label.new @form, {'text' => "Events:", "row" => r+table_ht+6, "col" => c, "color" => "white", "bgcolor"=>"blue", "display_length"=>60, "height"=>2}
+        #}
+        bind_key(?>) {
+          colcount = tcm.column_count-1
+          #atable.move_column sel_col.value, sel_col.value+1 unless sel_col.value == colcount
+          col = atable.focussed_col
+          atable.move_column col, col+1 unless col == colcount
+        }
+        bind_key(?<) {
+          col = atable.focussed_col
+          atable.move_column col, col-1 unless col == 0
+          #atable.move_column sel_col.value, sel_col.value-1 unless sel_col.value == 0
+        }
+        bind_key(?\M-h, app) {|tab,td| $log.debug " BIND... #{tab.class}, #{td.class}"; app.make_popup atable}
+      end
+      #keylabel = RubyCurses::Label.new @form, {'text' => "", "row" => r+table_ht+3, "col" => c, "color" => "yellow", "bgcolor"=>"blue", "display_length"=>60, "height"=>2}
+      #eventlabel = RubyCurses::Label.new @form, {'text' => "Events:", "row" => r+table_ht+6, "col" => c, "color" => "white", "bgcolor"=>"blue", "display_length"=>60, "height"=>2}
 
-    # report some events
-    #atable.table_model.bind(:TABLE_MODEL_EVENT){|e| #eventlabel.text = "Event: #{e}"}
-    #atable.get_table_column_model.bind(:TABLE_COLUMN_MODEL_EVENT){|e| eventlabel.text = "Event: #{e}"}
-    atable.bind(:TABLE_TRAVERSAL_EVENT){|e| @header.text_right "Row #{e.newrow+1} of #{atable.row_count}" }
+      # report some events
+      #atable.table_model.bind(:TABLE_MODEL_EVENT){|e| #eventlabel.text = "Event: #{e}"}
+      #atable.get_table_column_model.bind(:TABLE_COLUMN_MODEL_EVENT){|e| eventlabel.text = "Event: #{e}"}
+      atable.bind(:TABLE_TRAVERSAL_EVENT){|e| @header.text_right "Row #{e.newrow+1} of #{atable.row_count}" }
 
 
-    #str_renderer = TableCellRenderer.new ""
-    #num_renderer = TableCellRenderer.new "", { "justify" => :right }
-    #bool_renderer = CheckBoxCellRenderer.new "", {"parent" => atable, "display_length"=>5}
-    #combo_renderer =  RubyCurses::ComboBoxCellRenderer.new nil, {"parent" => atable, "display_length"=> 8}
-    #combo_editor = RubyCurses::CellEditor.new(RubyCurses::ComboBox.new nil, {"focusable"=>false, "visible"=>false, "list"=>statuses, "display_length"=>8})
-    #combo_editor1 = RubyCurses::CellEditor.new(RubyCurses::ComboBox.new nil, {"focusable"=>false, "visible"=>false, "list"=>modules, "display_length"=>8})
-    #atable.set_default_cell_renderer_for_class "String", str_renderer
-    #atable.set_default_cell_renderer_for_class "Fixnum", num_renderer
-    #atable.set_default_cell_renderer_for_class "Float", num_renderer
-    #atable.set_default_cell_renderer_for_class "TrueClass", bool_renderer
-    #atable.set_default_cell_renderer_for_class "FalseClass", bool_renderer
-    #atable.get_table_column_model.column(3).cell_editor =  combo_editor
-    #atable.get_table_column_model.column(0).cell_editor =  combo_editor1
-    #ce = atable.get_default_cell_editor_for_class "String"
-    # increase the maxlen of task
-    #ce.component.maxlen = 80
-    # I want up and down to go up and down rows inside the combo box, i can use M-down for changing.
-    #combo_editor.component.unbind_key(KEY_UP)
-    #combo_editor.component.unbind_key(KEY_DOWN)
-    #combo_editor1.component.unbind_key(KEY_UP)
-    #combo_editor1.component.unbind_key(KEY_DOWN)
-    buttrow = r+table_ht+8 #Ncurses.LINES-4
-    buttrow = Ncurses.LINES-5
-    create_table_actions atable, todo, data, categ.getvalue
+      #str_renderer = TableCellRenderer.new ""
+      #num_renderer = TableCellRenderer.new "", { "justify" => :right }
+      #bool_renderer = CheckBoxCellRenderer.new "", {"parent" => atable, "display_length"=>5}
+      #combo_renderer =  RubyCurses::ComboBoxCellRenderer.new nil, {"parent" => atable, "display_length"=> 8}
+      #combo_editor = RubyCurses::CellEditor.new(RubyCurses::ComboBox.new nil, {"focusable"=>false, "visible"=>false, "list"=>statuses, "display_length"=>8})
+      #combo_editor1 = RubyCurses::CellEditor.new(RubyCurses::ComboBox.new nil, {"focusable"=>false, "visible"=>false, "list"=>modules, "display_length"=>8})
+      #atable.set_default_cell_renderer_for_class "String", str_renderer
+      #atable.set_default_cell_renderer_for_class "Fixnum", num_renderer
+      #atable.set_default_cell_renderer_for_class "Float", num_renderer
+      #atable.set_default_cell_renderer_for_class "TrueClass", bool_renderer
+      #atable.set_default_cell_renderer_for_class "FalseClass", bool_renderer
+      #atable.get_table_column_model.column(3).cell_editor =  combo_editor
+      #atable.get_table_column_model.column(0).cell_editor =  combo_editor1
+      #ce = atable.get_default_cell_editor_for_class "String"
+      # increase the maxlen of task
+      #ce.component.maxlen = 80
+      # I want up and down to go up and down rows inside the combo box, i can use M-down for changing.
+      #combo_editor.component.unbind_key(KEY_UP)
+      #combo_editor.component.unbind_key(KEY_DOWN)
+      #combo_editor1.component.unbind_key(KEY_UP)
+      #combo_editor1.component.unbind_key(KEY_DOWN)
+      buttrow = r+table_ht+8 #Ncurses.LINES-4
+      buttrow = Ncurses.LINES-5
+      create_table_actions atable, todo, data, categ.getvalue
 =begin
     b_newrow = Button.new @form do
       text "&New"
@@ -377,28 +361,28 @@ class TodoApp
     end
     b_newrow.command { @new_act.call }
 =end
-    ## We use Action to create a button: to test out ampersand with MI and Button
-    new_act = @new_act
-    # using ampersand to set mnemonic
-    b_sort = Button.new @form do
-      text "&Sort"
-      row buttrow
-      col c+25
-      #bind(:ENTER) { status_row.text "Deletes focussed row" }
-      help_text "Sort focussed row" 
-    end
-    b_sort.command { 
-      if @sorted_key == atable.focussed_col
-        @sort_dir = !@sort_dir
-      else
-        @sort_dir = true
+      ## We use Action to create a button: to test out ampersand with MI and Button
+      new_act = @new_act
+      # using ampersand to set mnemonic
+      b_sort = Button.new @form do
+        text "&Sort"
+        row buttrow
+        col c+25
+        #bind(:ENTER) { status_row.text "Deletes focussed row" }
+        help_text "Sort focussed row" 
       end
+      b_sort.command { 
+        if @sorted_key == atable.focussed_col
+          @sort_dir = !@sort_dir
+        else
+          @sort_dir = true
+        end
       @sorted_key = atable.focussed_col
 
       $log.debug " SORT =  #{categ.getvalue}, #{atable.focussed_col}, sort:#{@sort_dir}"
       d = @todo.sort categ.getvalue, atable.focussed_col, @sort_dir
       atable.table_model.data = d
-    }
+      }
 =begin
     b_change = Button.new @form do
       text "&Lock"
@@ -426,125 +410,146 @@ class TodoApp
 =end
       #buttons = [b_save, b_newrow, b_delrow, b_move ]
       #Button.button_layout buttons, buttrow
-    @klp = RubyCurses::KeyLabelPrinter.new @form, get_key_labels
-    @klp.set_key_labels get_key_labels_table, :table
-    atable.bind(:ENTER){ @klp.mode :table ;
-    }
-    atable.bind(:LEAVE){@klp.mode :normal; 
-    }
-
+      @klp = RubyCurses::KeyLabelPrinter.new @form, get_key_labels
+      @klp.set_key_labels get_key_labels_table, :table
+      atable.bind(:ENTER){ @klp.mode :table ;
+      }
+      atable.bind(:LEAVE){@klp.mode :normal; 
+      }
 
-    @form.repaint
-    @window.wrefresh
-    Ncurses::Panel.update_panels
-    begin
-    while((ch = @window.getchar()) != ?\C-q.getbyte(0) )
-      colcount = tcm.column_count-1
-      s = keycode_tos ch
-      #status_row.text = "Pressed #{ch} , #{s}"
-      @form.handle_key(ch)
 
       @form.repaint
       @window.wrefresh
-    end
-    ensure
-    @window.destroy if !@window.nil?
-    end
-  end
-  # Adding was done in testtodo.rb. this is view only
-  def create_table_actions atable, todo, data, categ
-    #@new_act = Action.new("New Row", "mnemonic"=>"N") { 
-    @new_act = Action.new("&New Row") { 
-      cc = atable.get_table_column_model.column_count
-      if atable.row_count < 1
-        categ = nil
-        frow = 0
-      else
-        frow = atable.focussed_row
-        categ = atable.get_value_at(frow,1)
-        frow += 1
+      Ncurses::Panel.update_panels
+      begin
+        while((ch = @window.getchar()) != ?\C-q.getbyte(0) )
+          colcount = tcm.column_count-1
+          s = keycode_tos ch
+          #status_row.text = "Pressed #{ch} , #{s}"
+          @form.handle_key(ch)
+
+          @form.repaint
+          @window.wrefresh
+        end
+      ensure
+        @window.destroy if !@window.nil?
       end
-      tmp = [nil, categ, "",  5, "", "TODO", Time.now]
-      tm = atable.table_model
-      tm.insert frow, tmp
-      atable.set_focus_on frow
-      @status_row.text = "Added a row. Please press Save before changing Category."
-      alert("Added a row below current one. Use C-k to clear task.")
-    }
-    @new_act.accelerator "Alt-N"
-    @save_cmd = lambda {
+    end
+    # Adding was done in testtodo.rb. this is view only
+    def create_table_actions atable, todo, data, categ
+      #@new_act = Action.new("New Row", "mnemonic"=>"N") { 
+      @new_act = Action.new("&New Row") { 
+        cc = atable.get_table_column_model.column_count
+        if atable.row_count < 1
+          categ = nil
+          frow = 0
+        else
+          frow = atable.focussed_row
+          categ = atable.get_value_at(frow,1)
+          frow += 1
+        end
+        tmp = [nil, categ, "",  5, "", "TODO", Time.now]
+        tm = atable.table_model
+        tm.insert frow, tmp
+        atable.set_focus_on frow
+        @status_row.text = "Added a row. Please press Save before changing Category."
+        alert("Added a row below current one. Use C-k to clear task.")
+      }
+      @new_act.accelerator "Alt-N"
+      @save_cmd = lambda {
         todo.set_tasks_for_category categ, data
         todo.dump
         alert("Rewritten yaml file")
-    }
-    @del_cmd = lambda { 
-      row = atable.focussed_row
-      if confirm("Do your really want to delete row #{row+1}?")== :YES
-        tm = atable.table_model
-        tm.delete_at row
-      else
-        @status_row.text = "Delete cancelled"
-      end
-    }
+      }
+      @del_cmd = lambda { 
+        row = atable.focussed_row
+        if confirm("Do your really want to delete row #{row+1}?")== :YES
+          tm = atable.table_model
+          tm.delete_at row
+        else
+          @status_row.text = "Delete cancelled"
+        end
+      }
 
-  end
-  def make_popup table
-    require 'rbcurse/rpopupmenu'
-    tablemenu = RubyCurses::PopupMenu.new "Table"
-    #tablemenu.add(item = RubyCurses::MenuItem.new("Open",'O'))
-    tablemenu.add(item = RubyCurses::MenuItem.new("&Open"))
+    end
+    def make_popup table
+      require 'rbcurse/rpopupmenu'
+      tablemenu = RubyCurses::PopupMenu.new "Table"
+      #tablemenu.add(item = RubyCurses::MenuItem.new("Open",'O'))
+      tablemenu.add(item = RubyCurses::MenuItem.new("&Open"))
 
-    tablemenu.insert_separator 1
-    #tablemenu.add(RubyCurses::MenuItem.new "New",'N')
-    tablemenu.add(@new_act)
-    tablemenu.add(item = RubyCurses::MenuItem.new("&Save"))
-    item.command() { @save_cmd.call }
+      tablemenu.insert_separator 1
+      #tablemenu.add(RubyCurses::MenuItem.new "New",'N')
+      tablemenu.add(@new_act)
+      tablemenu.add(item = RubyCurses::MenuItem.new("&Save"))
+      item.command() { @save_cmd.call }
 
-    item=RubyCurses::MenuItem.new "Select"
-    item.accelerator = "Ctrl-X"
-    item.command() { table.toggle_row_selection() }
-    #item.enabled = false
-    tablemenu.add(item)
+      item=RubyCurses::MenuItem.new "Select"
+      item.accelerator = "Ctrl-X"
+      item.command() { table.toggle_row_selection() }
+      #item.enabled = false
+      tablemenu.add(item)
 
-    item=RubyCurses::MenuItem.new "Clr Selection"
-    item.accelerator = "Alt-e"
-    item.command() { table.clear_selection() }
-    item.enabled = table.selected_row_count > 0 ? true : false
-    tablemenu.add(item)
+      item=RubyCurses::MenuItem.new "Clr Selection"
+      item.accelerator = "Alt-e"
+      item.command() { table.clear_selection() }
+      item.enabled = table.selected_row_count > 0 ? true : false
+      tablemenu.add(item)
 
-    item=RubyCurses::MenuItem.new "Delete"
-    item.accelerator = "Alt-D"
-    item.command() { @del_cmd.call }
-    tablemenu.add(item)
+      item=RubyCurses::MenuItem.new "Delete"
+      item.accelerator = "Alt-D"
+      item.command() { @del_cmd.call }
+      tablemenu.add(item)
 
-    gotomenu = RubyCurses::Menu.new "&Goto"
+      gotomenu = RubyCurses::Menu.new "&Goto"
 
-    item = RubyCurses::MenuItem.new "Top"
-    item.accelerator = "Alt-0"
-    item.command() { table.goto_top }
-    gotomenu.add(item)
+      item = RubyCurses::MenuItem.new "Top"
+      item.accelerator = "Alt-0"
+      item.command() { table.goto_top }
+      gotomenu.add(item)
 
-    item = RubyCurses::MenuItem.new "Bottom"
-    item.accelerator = "Alt-9"
-    item.command() { table.goto_bottom }
-    gotomenu.add(item)
+      item = RubyCurses::MenuItem.new "Bottom"
+      item.accelerator = "Alt-9"
+      item.command() { table.goto_bottom }
+      gotomenu.add(item)
 
-    item = RubyCurses::MenuItem.new "Next Page"
-    item.accelerator = "Ctrl-n"
-    item.command() { table.scroll_forward }
-    gotomenu.add(item)
+      item = RubyCurses::MenuItem.new "Next Page"
+      item.accelerator = "Ctrl-n"
+      item.command() { table.scroll_forward }
+      gotomenu.add(item)
 
-    item = RubyCurses::MenuItem.new "Prev Page"
-    item.accelerator = "Ctrl-p"
-    item.command() { table.scroll_backward }
-    gotomenu.add(item)
+      item = RubyCurses::MenuItem.new "Prev Page"
+      item.accelerator = "Ctrl-p"
+      item.command() { table.scroll_backward }
+      gotomenu.add(item)
 
-    tablemenu.add(gotomenu)
+      tablemenu.add(gotomenu)
 
 
-    tablemenu.show @atable, 0,1
+      tablemenu.show @atable, 0,1
+    end
+    def get_key_labels
+      key_labels = [
+        ['C-q', 'Exit'], nil,
+        ['M-c', 'Category'], nil,
+        ['M-f', 'Filter Fld'], ['M-p', 'Pattern'],
+        ['M-s', 'Sort'], ['M-i', 'Filter']
+      ]
+      return key_labels
+    end
+    def get_key_labels_table
+      key_labels = [
+        #['M-n','NewRow'], ['M-d','DelRow'],
+        ['C-x','Select'], ['M-h', 'Popup'],
+        ['M-0', 'Top'], ['M-9', 'End'],
+        ['C-p', 'PgUp'], ['C-n', 'PgDn'],
+        ['M-Tab','Nxt Fld'], ['Tab','Nxt Col'],
+        ['+','Widen'], ['-','Narrow']
+      ]
+      return key_labels
+    end
   end
-end
+end # module
 if $0 == __FILE__
   include RubyCurses
   include RubyCurses::Utils
@@ -558,7 +563,7 @@ if $0 == __FILE__
     colors = Ncurses.COLORS
 
     catch(:close) do
-      t = TodoApp.new
+      t = ViewTodo::TodoApp.new
       t.run
   end
   rescue => ex