ruport 0.8.14 → 0.10.0

data/test/{test_report.rb → report_test.rb}

@@ -15,15 +15,35 @@ rescue LoadError
   $stderr.puts "Warning: Mocha not found -- skipping some Report tests"
 end
 
+class SampleReport < Ruport::Report
+  renders_with Ruport::Renderer::Table
+
+  def generate
+    Table(%w[not abc]) << %w[o r] << %w[one two] << %w[thr ee]
+  end
+end
+
 class TestReport < Test::Unit::TestCase
   include Ruport
 
   def setup
     @report = Report.new
-    Ruport::Config.source :default, :dsn => "ruport:test", 
-                                    :user => "foo", :password => "bar" 
-    @query1 = Ruport::Query.new "select * from foo", :cache_enabled => true 
-    @query1.cached_data = [[1,2,3],[4,5,6],[7,8,9]].to_table(%w[a b c]) 
+  end
+
+  def test_renders_with_shortcuts
+    a = SampleReport.new(:csv)
+    assert_equal("not,abc\no,r\none,two\nthr,ee\n",a.run)
+    assert_equal("not,abc\no,r\none,two\nthr,ee\n",SampleReport.as(:csv))
+    assert_equal("not,abc\no,r\none,two\nthr,ee\n",SampleReport.to_csv)
+    assert_equal("not,abc\no,r\none,two\nthr,ee\n",a.to_csv)
+    a = SampleReport.new
+    assert_equal("not,abc\no,r\none,two\nthr,ee\n",a.to_csv)
+
+    #not sure if this is 'good behaviour'
+    assert_equal :csv, a.format
+    a.to_text
+
+    assert_equal :text, a.format
   end
 
   def test_erb
@@ -33,23 +53,6 @@ class TestReport < Test::Unit::TestCase
     assert_equal "foo\n4\n---\n", @report.erb("test/samples/foo.rtxt")
   end
 
-  def test_textile
-    @report = Report.new
-    assert_equal "<p><strong>foo</strong></p>", @report.textile("*foo*")
-  end
-  
-  def test_query
-    assert_kind_of Ruport::Data::Table, 
-      @report.query("blah",:query_obj => @query1)
-    expected = [[1,2,3],[4,5,6],[7,8,9]]
-    @report.query("blah",:query_obj => @query1, :yield_type => :by_row) { |r|
-      assert_equal expected.shift, r.to_a
-      assert_equal %w[a b c], r.attributes
-    }
-    assert_equal "a,b,c\n1,2,3\n4,5,6\n7,8,9\n", 
-       @report.query("blah",:query_obj => @query1, :as => :csv)       
-  end
-
   class MyReport < Report; end
   
   def test_klass_methods
@@ -91,7 +94,7 @@ class TestReport < Test::Unit::TestCase
     rep_klass.send(:generate) { raise }
 
     assert_raises(RuntimeError){ 
-      rep_klass.run(:tries => 3, :interval => 1, :log_level => :log_only)
+      rep_klass.run(:tries => 3, :interval => 1)
     }
     
     rep_klass.send(:generate) { sleep 1.1 }
@@ -116,17 +119,7 @@ class TestReport < Test::Unit::TestCase
     assert_equal ["hello dolly", "hello dolly"],
       rep_klass.run(:reports => [rep_klass.new,rep_klass.new])
   end
-  
-  def test_send_to
-     return unless Object.const_defined? :Mocha
-     setup_mock_mailer
-     @report = Report.new
-     assert_equal "250 ok", @report.send_to("clyde@example.com") { |mail|
-       mail.subject = "Test Report"
-       mail.text = "Test"
-     }
-   end
- 
+
    def test_write_to_file
      return unless Object.const_defined? :Mocha
      file = mock("file")
@@ -172,17 +165,54 @@ class TestReport < Test::Unit::TestCase
  
      assert_equal expected, array
    end
- 
-   private
- 
-   def setup_mock_mailer
-     @smtp     = mock('smtp')
- 
-     Net::SMTP.expects(:start).
-       yields(@smtp).
-       returns("250 ok").at_least_once
-     @smtp.stubs(:send_message).
-       returns("250 ok")
+
+   def test_renders_with
+    klass = MyReport.dup
+    klass.renders_with Ruport::Renderer::Table
+    klass.send(:generate) { [[1,2,3],[4,5,6]].to_table(%w[a b c]) }
+    a = klass.new(:csv)
+    assert_equal "a,b,c\n1,2,3\n4,5,6\n", a.run
+
+    klass.renders_with Ruport::Renderer::Table, :show_table_headers => false
+    a = klass.new(:csv)
+    assert_equal "1,2,3\n4,5,6\n", a.run
+    assert_equal "a,b,c\n1,2,3\n4,5,6\n", a.run(:show_table_headers => true)
+
+
    end
  
+   def test_renders_as_table
+     klass = MyReport.dup
+     klass.renders_as_table
+     klass.send(:generate) { [[1,2,3],[4,5,6]].to_table(%w[a b c]) }
+     a = klass.new(:csv)
+     assert_equal "a,b,c\n1,2,3\n4,5,6\n", a.run
+   end      
+   
+   def test_renders_as_row
+     klass = MyReport.dup
+     klass.renders_as_row
+     klass.send(:generate) { [[1,2,3]].to_table(%w[a b c])[0] }
+     a = klass.new(:csv)
+     assert_equal "1,2,3\n", a.run
+   end      
+   
+   def test_renders_as_group
+     klass = MyReport.dup
+     klass.renders_as_group
+     klass.send(:generate) { [[1,2,3]].to_table(%w[a b c]).to_group("foo") }
+     a = klass.new(:csv)
+     assert_equal "foo\n\na,b,c\n1,2,3\n", a.run
+   end    
+   
+   def test_renders_as_grouping
+     klass = MyReport.dup
+     klass.renders_as_grouping
+     klass.send(:generate) { 
+       Grouping([[1,2,3],[4,5,6]].to_table(%w[a b c]),:by => "a")
+     }
+     a = klass.new(:csv)
+     assert_equal "1\n\nb,c\n2,3\n\n4\n\nb,c\n5,6\n\n", a.run
+   end
+
 end

data/test/samples/ticket_count.csv

@@ -0,0 +1,124 @@
+title,date
+Ticket #238 (enhancement closed): Table#sort_rows_by!,2007-04-17
+Ticket #225 (task closed): corner bottlenecks with focused benchmarks,2007-04-17
+Ticket #223 (task closed): Identify a small set of key benchmarks,2007-04-17
+Ticket #209 (task closed): Refactor Formatters,2007-04-15
+Ticket #236 (task closed): api.rubyreports.org/edge,2007-04-13
+Ticket #212 (task closed): Users Field Guide,2007-04-13
+Ticket #186 (enhancement closed): simple_html_table,2007-04-13
+Ticket #235 (task closed): Get a big list of all the methods in Ruport.  Stare at them.  Identify their interface.  Cry.,2007-04-13
+Ticket #196 (defect closed): as() returns unintelligible error for non-registered formats,2007-04-13
+Ticket #244 (defect closed): Allow proper copying of Grouping,2007-04-12
+Ticket #249 (enhancement closed): Table#rename_columns should accept a block,2007-04-11
+Ticket #249 (enhancement created): Table#rename_columns should accept a block,2007-04-11
+Ticket #188 (defect closed): class_str broken in 0.9.2,2007-04-11
+Ticket #224 (task closed): Build ruport_bench which will run benchmarks and generate reports,2007-04-11
+Ticket #241 (task closed): rewrite Table/Group dup methods to use initialize_copy instead,2007-04-11
+Ticket #220 (enhancement closed): rope rake tasks for ruport-util,2007-04-10
+Ticket #219 (task closed): XML/FO Formatter,2007-04-07
+Ticket #211 (task closed): Remove Multilevel Grouping Formatters,2007-04-06
+Ticket #248 (task created): AAR Name,2007-04-05
+Ticket #204 (task closed): Merge AAR to Trunk,2007-04-05
+Ticket #203 (task closed): AAR Tests,2007-04-05
+Ticket #226 (task closed): investigate Ara's xx for html helpers.,2007-04-04
+"Ticket #247 (task created): Ruport Utils wiki page, and update of deprecated plugin pages",2007-04-04
+Ticket #245 (task closed): Make initial RubyForge release,2007-04-04
+Ticket #246 (enhancement created): Grouping#summary,2007-04-04
+Ticket #245 (task created): Make initial RubyForge release,2007-04-04
+Ticket #229 (enhancement closed): Add tests for invoice,2007-04-04
+Ticket #231 (enhancement closed): ReportManager tests,2007-04-04
+Ticket #221 (task closed): improve invoice interface,2007-04-04
+Ticket #233 (task closed): ReportManager example,2007-04-04
+Ticket #230 (enhancement closed): Add support for line labels in graph,2007-04-04
+Ticket #242 (task closed): set mike up with stats access,2007-04-04
+Ticket #202 (task closed): AAR Branch,2007-04-04
+Ticket #234 (defect closed): options should not be used as an argument name anywhere in Renderers or Formatters,2007-04-04
+Ticket #244 (defect created): Allow proper copying of Grouping,2007-04-04
+Ticket #240 (task closed): use self.class.new where appropriate,2007-04-04
+Ticket #243 (task closed): fix circular dependency issue in rope,2007-04-04
+Ticket #243 (task created): fix circular dependency issue in rope,2007-04-04
+Ticket #242 (task created): set mike up with stats access,2007-04-03
+Ticket #241 (task created): rewrite Table/Group dup methods to use initialize_copy instead,2007-04-03
+Ticket #237 (task closed): set mike up with all the necessary resource permissions for releases,2007-04-02
+Ticket #227 (task closed): packaging rake task for Release,2007-04-02
+Ticket #240 (task created): use self.class.new where appropriate,2007-04-02
+Ticket #191 (enhancement closed): render_grouping,2007-04-01
+Ticket #239 (enhancement created): Table#sort_rows_by should accept non-array single arg.,2007-04-01
+Ticket #238 (enhancement created): Table#sort_rows_by!,2007-04-01
+Ticket #237 (task created): set mike up with all the necessary resource permissions for releases,2007-04-01
+Ticket #78 (enhancement closed): Do we need  to bring back a SQL generator?,2007-03-31
+Ticket #236 (task created): api.rubyreports.org/edge,2007-03-31
+Ticket #235 (task created): Get a big list of all the methods in Ruport.  Stare at them.  Identify their interface.  Cry.,2007-03-31
+Ticket #228 (enhancement closed): Layout method,2007-03-31
+Ticket #234 (defect created): options should not be used as an argument name anywhere in Renderers or Formatters,2007-03-31
+Ticket #217 (task closed): Depluginize initial set of utils,2007-03-31
+Ticket #232 (task closed): ReportManager example,2007-03-31
+Ticket #233 (task created): ReportManager example,2007-03-31
+Ticket #232 (task created): ReportManager example,2007-03-31
+Ticket #231 (enhancement created): ReportManager tests,2007-03-31
+Ticket #230 (enhancement created): Add support for line labels in graph,2007-03-31
+Ticket #216 (task closed): Fix Graphing,2007-03-31
+Ticket #229 (enhancement created): Add tests for invoice,2007-03-31
+Ticket #228 (enhancement created): Layout method,2007-03-31
+Ticket #222 (task closed): add ruport-util component in Trac,2007-03-31
+Ticket #218 (task closed): move svn repository up one level,2007-03-31
+Ticket #227 (task created): packaging rake task for Release,2007-03-31
+Ticket #226 (task created): investigate Ara's xx for html helpers.,2007-03-30
+Ticket #199 (task closed): Update License Information,2007-03-30
+Ticket #178 (task closed): Grouping Renderer,2007-03-30
+Ticket #225 (task created): corner bottlenecks with focused benchmarks,2007-03-30
+Ticket #224 (task created): Build ruport_bench which will run benchmarks and generate reports,2007-03-30
+Ticket #223 (task created): Identify a small set of key benchmarks,2007-03-30
+Ticket #106 (task closed): standardize API documentation format and cleanup where needed,2007-03-30
+Ticket #199 (task closed): Update License Information,2007-03-30
+Ticket #184 (task closed): Consistent Errors,2007-03-30
+Ticket #222 (task created): add ruport-util component in Trac,2007-03-30
+Ticket #221 (task created): improve invoice interface,2007-03-30
+Ticket #220 (enhancement created): rope rake tasks for ruport-util,2007-03-30
+Ticket #219 (task created): XML/FO Formatter,2007-03-30
+Ticket #218 (task created): move svn repository up one level,2007-03-30
+Ticket #217 (task created): Depluginize initial set of utils,2007-03-30
+Ticket #216 (task created): Fix Graphing,2007-03-30
+Ticket #215 (task closed): apply for RubyForge project,2007-03-30
+Ticket #215 (task created): apply for RubyForge project,2007-03-30
+Ticket #214 (task created): Determine if cheatsheets can be released,2007-03-30
+Ticket #213 (task created): Contributors Field Guide,2007-03-30
+Ticket #212 (task created): Users Field Guide,2007-03-30
+Ticket #211 (task created): Remove Multilevel Grouping Formatters,2007-03-30
+Ticket #210 (task created): Formatting Helpers,2007-03-30
+Ticket #209 (task created): Refactor Formatters,2007-03-30
+Ticket #208 (task created): API Stability,2007-03-30
+Ticket #207 (task created): Refactor Unit Tests,2007-03-30
+Ticket #206 (task created): Testing Audit,2007-03-30
+Ticket #205 (task created): Custom Exceptions,2007-03-30
+Ticket #204 (task created): Merge AAR to Trunk,2007-03-30
+Ticket #203 (task created): AAR Tests,2007-03-30
+Ticket #202 (task created): AAR Branch,2007-03-30
+Ticket #201 (task created): Standardize API Docs,2007-03-30
+Ticket #200 (task created): Remove Deprecated Docs,2007-03-30
+Ticket #199 (task created): Update License Information,2007-03-30
+Ticket #198 (task created): rubyreports.org webpage,2007-03-30
+Ticket #197 (task created): Proper Licensing Statements,2007-03-28
+Ticket #196 (defect created): as() returns unintelligible error for non-registered formats,2007-03-28
+Ticket #195 (enhancement closed): Formatter::PDF#draw_table,2007-03-27
+"Ticket #194 (enhancement closed): renders_for should take multiple formats, renderers.",2007-03-26
+Ticket #193 (task closed): Make Renderer.add_format private and remove add_core_format,2007-03-26
+Ticket #195 (enhancement created): Formatter::PDF#draw_table,2007-03-26
+"Ticket #194 (enhancement created): renders_for should take multiple formats, renderers.",2007-03-26
+Ticket #193 (task created): Make Renderer.add_format private and remove add_core_format,2007-03-26
+Ticket #183 (task closed): Remove Shortcuts from Core,2007-03-26
+Ticket #192 (enhancement created): renders_with should take default options,2007-03-26
+Ticket #191 (enhancement created): render_grouping,2007-03-25
+Ticket #190 (enhancement created): Report shortcuts for rendering,2007-03-25
+Ticket #189 (enhancement created): sub_table / reduce should take single arg range,2007-03-25
+Ticket #187 (enhancement closed): Ruport::Format::Plugin becomes Ruport::Formatter,2007-03-24
+Ticket #163 (task closed): Data::Group,2007-03-23
+Ticket #144 (enhancement closed): SQL Formatter?,2007-03-23
+Ticket #188 (defect created): class_str broken in 0.9.2,2007-03-23
+Ticket #187 (enhancement created): Ruport::Format::Plugin becomes Ruport::Formatter,2007-03-23
+Ticket #174 (enhancement closed): Grouping & Group data structures,2007-03-23
+Ticket #186 (enhancement created): simple_html_table,2007-03-23
+Ticket #185 (task created): Sanitize,2007-03-22
+Ticket #184 (task created): Consistent Errors,2007-03-22
+Ticket #183 (task created): Remove Shortcuts from Core,2007-03-22
+Ticket #182 (defect closed): rope does not regenerate deleted test_files when using 'rake build',2007-03-19

data/test/{test_table.rb → table_test.rb}

@@ -26,11 +26,7 @@ class TestTable < Test::Unit::TestCase
       assert_equal n, t.column_names
 
     t = [[1,2,3],[4,5,6]].to_table(%w[a b c])
-    t[0].tag :foo
-    t[1].tag :bar
     table_from_records = t.data.to_table(t.column_names)
-    assert_equal Set.new([:foo]), table_from_records[0].tags
-    assert_equal Set.new([:bar]), table_from_records[1].tags
     end
     
     a = Ruport::Data::Record.new [1,2,3]
@@ -51,6 +47,14 @@ class TestTable < Test::Unit::TestCase
     assert_equal [1,2,3,4], a.column(0)
     
   end
+
+  def test_to_group
+    a =[[1,2,3],[4,5,6]].to_table(%w[a b c]).to_group("Packrats")
+    b = Ruport::Data::Group.new( :data => [[1,2,3],[4,5,6]],
+                                 :column_names => %w[a b c],
+                                 :name => "Packrats" )
+    assert_equal a,b
+  end
   
   def test_set_column_names
     a = [[1,2,3],[4,5,6]].to_table
@@ -78,7 +82,7 @@ class TestTable < Test::Unit::TestCase
     assert_equal([table[2]], table.rows_with_b(8))
     assert_equal [table[1]], table.rows_with(%w[a b]) { |a,b| [a,b] == [1,3] }
   end
-  
+
   def test_append_record  
     table = Ruport::Data::Table.new :column_names => %w[a b c]
     table << Ruport::Data::Record.new([1,2,3], :attributes => %w[a b c])
@@ -86,8 +90,7 @@ class TestTable < Test::Unit::TestCase
     assert_equal(%w[a b c],table[0].attributes)
     rec = table[0].dup
     rec.attributes = %w[a b c d]
-    assert_raise(ArgumentError) { table << Object.new }
-    assert_raise(ArgumentError) { table << [].to_table }
+    assert_raise(NoMethodError) { table << Object.new }
   end
   
   def test_append_hash
@@ -133,10 +136,30 @@ class TestTable < Test::Unit::TestCase
                  table.sub_table(%w[a c])
      
     assert_equal [[10,11,12,13],[14,15,16,17]].to_table(%w[a b c d]),      
-                 table.sub_table { |r| r.c > 10 }
+                 table.sub_table { |r| r.c > 10 }      
+                 
+    assert_equal [[10,11,12,13],[14,15,16,17]].to_table(%w[a b c d]),      
+                table.sub_table(2..-1)   
                   
   end
 
+  def test_reduce
+
+    table = [ [1,2,3,4],[5,6,7,9],
+              [10,11,12,13],[14,15,16,17] ].to_table(%w[a b c d])
+
+    table.reduce(%w[b c],1..-2)
+    assert_equal [[6,7],[11,12]].to_table(%w[b c]), table
+
+    table = [ [1,2,3,4],[5,6,7,9],
+              [10,11,12,13],[14,15,16,17] ].to_table(%w[a b c d])
+    table.reduce(%w[c d a]) { |r| r.a < 10 }
+
+    assert_equal [[3,4,1],[7,9,5]].to_table(%w[c d a]),  
+                 table
+
+  end
+
   def test_csv_load
     table = Ruport::Data::Table.load("test/samples/data.csv")
     assert_equal %w[col1 col2 col3], table.column_names
@@ -149,7 +172,26 @@ class TestTable < Test::Unit::TestCase
     table = Ruport::Data::Table.load( "test/samples/data.tsv", 
                                       :csv_options => { :col_sep => "\t" } )
     assert_equal expected, table 
-    
+
+
+   expected = ['c','e']
+   
+   table = Ruport::Data::Table.load( "test/samples/data.csv", :csv_options => 
+    { :headers => true, :header_converters => :symbol } ) do |s,r|
+    assert_equal expected.shift, r[:col3]
+   end
+
+   assert_equal [:col1,:col2,:col3], table.column_names
+
+   
+   expected = ['c','e']
+   
+   Ruport::Data::Table.load( "test/samples/data.csv", 
+                             :records => true ) do |s,r|
+      assert_equal expected.shift, r.col3
+      assert_kind_of Ruport::Data::Record, r
+   end
+     
     table = Ruport::Data::Table.load("test/samples/data.csv", :has_names => false)
     assert_equal([],table.column_names)
     assert_equal([%w[col1 col2 col3],%w[a b c],["d",nil,"e"]].to_table, table)
@@ -174,6 +216,7 @@ class TestTable < Test::Unit::TestCase
                                        :has_names => false)
     assert_equal([],table.column_names)
     assert_equal([%w[a b c],%w[1 2 3], %w[4 5 6]].to_table, table) 
+
     
   end
   
@@ -246,6 +289,55 @@ class TestTable < Test::Unit::TestCase
       [3,nil,4,'x',7],
       [5,nil,6,'x',11] ].to_table(%w[a x b c d]), a)          
     
+  end        
+  
+  def test_add_columns 
+    a = [[1,2],[3,4],[5,6]].to_table(%w[a b])
+    a.add_columns(%w[c d])
+    expected = [ [1,2,nil,nil],
+                 [3,4,nil,nil],
+                 [5,6,nil,nil] ].to_table(%w[a b c d])
+    
+    assert_equal expected, a                  
+    
+    a = [[1,2],[3,4],[5,6]].to_table(%w[a b])
+    
+    a.add_columns(%w[c d],:after => "a")
+    
+    expected = [ [1,nil,nil,2],
+                 [3,nil,nil,4],
+                 [5,nil,nil,6], ].to_table(%w[a c d b])                        
+  
+    assert_equal expected, a                                   
+    
+    a.add_columns(%w[x f],:before => "a")
+    
+    expected = [ [nil,nil,1,nil,nil,2],
+                 [nil,nil,3,nil,nil,4],
+                 [nil,nil,5,nil,nil,6] ].to_table(%w[x f a c d b])
+                                         
+    assert_equal expected, a       
+    
+    a = [[1,2,0],[3,4,0],[5,6,0]].to_table(%w[a b c])  
+    
+    a.add_columns(%w[x y],:default => 9, :position => 1)
+    
+    expected = [[1,9,9,2,0],[3,9,9,4,0],[5,9,9,6,0]].to_table(%w[a x y b c])  
+    
+    assert_equal expected, a
+    
+    a = [[1,2],[3,4],[5,6]].to_table(%w[a b])
+    a.add_columns(%w[f x],:default => 0)
+    
+    expected = [[1,2,0,0],[3,4,0,0],[5,6,0,0]].to_table(%w[a b f x])
+    assert_equal expected, a
+    
+    assert_raises(RuntimeError) do 
+      a.add_columns(%w[a b]) { } 
+    end
+    
+     
+    
   end
   
   def test_remove_column
@@ -273,6 +365,28 @@ class TestTable < Test::Unit::TestCase
     a.rename_column("b","x")
     assert_equal Table(%w[a x]) { |t| t << [1,2] << [3,4] }, a
   end     
+
+  
+  def test_rename_columns
+    a = Table(%w[a b]) { |t| t << [1,2] << [3,4] }
+    a.rename_columns(%w[a b], %w[x y])
+    assert_equal Table(%w[x y]) { |t| t << [1,2] << [3,4] }, a
+
+    a = Table(%w[a b]) { |t| t << [1,2] << [3,4] }
+    a.rename_columns("a"=>"x","b"=>"y")
+    assert_equal Table(%w[x y]) { |t| t << [1,2] << [3,4] }, a
+
+    a = Table(%w[a b]) { |t| t << [1,2] << [3,4] }
+    assert_raise(ArgumentError) { a.rename_columns(%w[a b], %w[x]) }
+
+    a = Table(%w[a b c]) { |t| t << [1,2,3] << [4,5,6] }
+    a.rename_columns { |r| r.to_sym }
+    assert_equal(a, Table(:a,:b,:c) { |t| t << [1,2,3] << [4,5,6] })
+
+    a = Table(%w[a b c]) { |t| t << [1,2,3] << [4,5,6] }
+    a.rename_columns(%w[a c]) { |r| r.to_sym }
+    assert_equal(a, Table(:a,"b",:c) { |t| t << [1,2,3] << [4,5,6] })
+  end     
   
   def test_swap_column
    a = Table(%w[a b]) { |t| t << [1,2] << [3,4] }
@@ -286,6 +400,8 @@ class TestTable < Test::Unit::TestCase
    a = Table(%w[a b c]) { |t| t << [1,2,3] << [4,5,6] }  
    a.replace_column("b","d") { |r| r.b.to_s }
    assert_equal Table(%w[a d c]) { |t| t << [1,"2",3] << [4,"5",6] }, a
+   a.replace_column("d") { |r| r.d.to_i }
+   assert_equal Table(%w[a d c]) { |t| t << [1,2,3] << [4,5,6] }, a
   end
   
   def test_append_chain
@@ -299,12 +415,16 @@ class TestTable < Test::Unit::TestCase
     table = Ruport::Data::Table.new :column_names => %w[a b], 
                                     :data => [[1,2],[3,4],[5,6]]
     assert_equal("a,b\n1,2\n3,4\n5,6\n",table.to_csv)
+    assert_raises(Ruport::Renderer::UnknownFormatError) { table.to_nothing }
   end
   
   
   def test_sort_rows_by
     table = Ruport::Data::Table.new :column_names => %w[a b c]
-    table << [1,2,3] << [6,1,8] << [9,1,4]
+    table << [1,2,3] << [6,1,8] << [9,1,4]    
+    
+    table2 = Ruport::Data::Table.new :column_names => [:a, :b, :c]
+    table2 << [1,2,3] << [6,1,8] << [9,1,4]
 
     sorted_table_a = Ruport::Data::Table.new :column_names => %w[a b c]
     sorted_table_a << [1,2,3] << [6,1,8] << [9,1,4]
@@ -313,11 +433,42 @@ class TestTable < Test::Unit::TestCase
     sorted_table_b << [6,1,8] << [9,1,4] << [1,2,3]
     
     sorted_table_bc = Ruport::Data::Table.new :column_names => %w[a b c]
-    sorted_table_bc << [9,1,4] << [6,1,8] << [1,2,3]
+    sorted_table_bc << [9,1,4] << [6,1,8] << [1,2,3] 
+    
+    sorted_table_bs = Ruport::Data::Table.new :column_names => [:a, :b, :c]
+    sorted_table_bs << [6,1,8] << [9,1,4] << [1,2,3]
   
     assert_equal sorted_table_a,  table.sort_rows_by {|r| r['a']}
     assert_equal sorted_table_b,  table.sort_rows_by(['b'])
     assert_equal sorted_table_bc, table.sort_rows_by(['b', 'c'])
+    assert_equal sorted_table_bs, table2.sort_rows_by(:b)
+  end              
+  
+  def test_sort_rows_by!
+    table = Ruport::Data::Table.new :column_names => %w[a b c]
+    table << [1,2,3] << [6,1,8] << [9,1,4]
+
+    sorted_table_a = Ruport::Data::Table.new :column_names => %w[a b c]
+    sorted_table_a << [1,2,3] << [6,1,8] << [9,1,4]
+
+    sorted_table_b = Ruport::Data::Table.new :column_names => %w[a b c]
+    sorted_table_b << [6,1,8] << [9,1,4] << [1,2,3]
+    
+    sorted_table_bc = Ruport::Data::Table.new :column_names => %w[a b c]
+    sorted_table_bc << [9,1,4] << [6,1,8] << [1,2,3]
+    
+    table_a = table.dup
+    table_a.sort_rows_by! { |r| r['a'] }       
+    
+    table_b = table.dup
+    table_b.sort_rows_by!("b")
+    
+    table_bc = table.dup
+    table_bc.sort_rows_by!(['b', 'c'])             
+  
+    assert_equal sorted_table_a,  table_a
+    assert_equal sorted_table_b,  table_b
+    assert_equal sorted_table_bc, table_bc
   end
 
   def test_array_hack
@@ -332,14 +483,6 @@ class TestTable < Test::Unit::TestCase
     assert_equal table, table2
 
   end    
-                   
-  # for those in a meta-mood (mostly just a collection coverage )
-  def test_table_to_table
-   a = [[1,2,3]].to_table 
-   assert_kind_of Ruport::Data::Table, a
-   assert_equal [[1,2,3]].to_table(%w[a b c]), 
-                a.to_table(:column_names => %w[a b c])
-  end
 
   def test_record_class
     a = Ruport::Data::Table.new( :column_names => %w[first_name last_name c], 
@@ -362,6 +505,30 @@ class TestTable < Test::Unit::TestCase
     assert_equal ['joe frasier', 'brian black'],
                  b.map { |r| r.name }
 
+  end 
+  
+  def test_to_hack_takes_args
+    a = Table(%w[hello mr crowley]) << %w[would you like] << %w[one red cat]
+    
+    assert_equal "would,you,like\none,red,cat\n",
+                 a.to_csv(:show_table_headers => false)
+    
+    assert_equal "would,you,like\none,red,cat\n",
+                 a.to_csv { |r| r.show_table_headers = false }    
+                 
+    assert_equal "would\tyou\tlike\none\tred\tcat\n",
+                 a.to_csv(:show_table_headers => false) { |r|
+                   r.format_options = { :col_sep => "\t" }
+                 }
+      
+  end
+
+  def test_as_throws_proper_errors
+    a = [[1,2,3],[4,5,6]].to_table(%w[a b c])
+    assert_nothing_raised { a.as(:csv) }
+    assert_nothing_raised { a.to_csv }
+    assert_raises(Ruport::Renderer::UnknownFormatError) { a.as(:nothing) }
+    assert_raises(Ruport::Renderer::UnknownFormatError) { a.to_nothing }
   end
 
 
@@ -428,15 +595,6 @@ class TestTable < Test::Unit::TestCase
     assert_equal 4, x.length
   end
   
-  # bug found with paul novak 2007.01.17
-  def test_ensure_tags_preserved_in_subtable
-    a = [[1,2,3],[4,5,6],[7,8,9]].to_table(%w[a b c])
-    a[1].tag(:foo)
-    a.create_group("bar") { |r| r.b < 6 }
-    assert_equal Set.new(["grp_bar"]), a.group("bar")[0].tags
-    assert_equal Set.new([:foo,"grp_bar"]), a.group("bar")[1].tags
-  end
-  
   def test_ensure_coerce_sum
     s = [["1"],["3"],["5"] ].to_table
     t = [["1.23"],["1.5"]].to_table
@@ -445,20 +603,6 @@ class TestTable < Test::Unit::TestCase
     assert_equal(2.73,t.sum(0))
   end
   
-  #Ticket #142          
-  def test_ensure_constructor_dups_record_tags
-    a = [[1,2,3],[4,5,6],[7,8,9]].to_table(%w[a b c])
-    b = a.dup    
-    
-    a[0].tag :foo
-    assert_equal Set.new([]), b[0].tags
-    assert_equal Set.new([:foo]),a[0].tags
-    
-    b[1].tag :bar
-    assert_equal Set.new([]), a[1].tags
-    assert_equal Set.new([:bar]), b[1].tags
-  end
-
   def test_ensure_serializable
     a = [].to_table
     assert_nothing_raised { a.to_yaml }
@@ -489,21 +633,52 @@ class TestTable < Test::Unit::TestCase
 
     a = [[1,2,3],[4,5,6]].to_table
 
+    a.replace_column(1) { |r| r[0] + r[2] }
+
+    a.column_names = %w[d e f]
+    assert_equal [[1,4,3],[4,10,6]].to_table(%w[d e f]), a
+
+    a = [[1,2,3],[4,5,6]].to_table
+
+    a.replace_column(2) { |r| r[0] + 5 }
+
     a.column_names = %w[a b c]
 
+    a.replace_column("b") { |r| r.a + 4 }
     a.replace_column("b","foo") { |r| r.b + 1 }
 
-    assert_equal [[1,3,3],[4,6,6]].to_table(%w[a foo c]), a
+    assert_equal [[1,6,6],[4,9,9]].to_table(%w[a foo c]), a
   end
 
   def test_ensure_propagate_record_class
-    a = Ruport::Data::Table.new(:record_class => DuckRecord)
+    a = Table(:record_class => DuckRecord)
     assert_equal DuckRecord, a.record_class
 
     b = a.dup
     assert_equal DuckRecord, b.record_class
   end
 
+  def test_ensure_reorder_raises_on_bad_reorder_use
+    a = Table() << [1,2,3] << [4,5,6]
+    assert_raise(ArgumentError) { a.reorder("a","b","c") }
+    assert_raise(ArgumentError) { a.reorder(%w[a b c]) }
+    assert_raise(ArgumentError) { a.reorder(2,1,0) }
+  end    
+  
+  def test_ensure_csv_loading_accepts_table_options
+     a = Table("test/samples/addressbook.csv",:record_class => DuckRecord)
+     a.each { |r| assert_kind_of(DuckRecord,r) }
+  end
+
+
+  class MySubClass < Ruport::Data::Table; end
+  
+  def test_ensure_table_subclasses_render_properly
+    a = MySubClass.new
+    a << [1,2,3] << [4,5,6]
+    assert_equal("1,2,3\n4,5,6\n",a.as(:csv))
+  end
+
 end
 
 class DuckRecord < Ruport::Data::Record; end
@@ -526,5 +701,41 @@ class TestTableKernelHack < Test::Unit::TestCase
     assert_equal Table("a"), Table(%w[a])
     assert_equal Table(:a), Table([:a])
   end
+
+  def test_iterators
+
+    Table("test/samples/addressbook.csv") do |s,r|
+      assert_kind_of(Array,r)
+      assert_kind_of(Ruport::Data::Table,s)
+    end
+
+    n = 0
+
+    Table(:string => "a,b,c\n1,2,3\n4,5,6\n") do |s,r|
+      assert_kind_of(Array,r)
+      assert_kind_of(Ruport::Data::Table,s)
+      n += 1
+    end
+
+    assert_equal 2, n
+    
+  end
+  
+  def test_with_file_arg
+    assert_equal Table("test/samples/addressbook.csv"),
+                 Table(:file => "test/samples/addressbook.csv")
+  end
+   
+  def test_with_string_arg
+    csv_string = "id,name\n1,Inky\n2,Blinky\n3,Clyde"
+     
+    assert_equal Ruport::Data::Table.parse(csv_string),
+                 Table(:string => csv_string)
+  end
+
+  def test_ensure_table_hack_accepts_normal_constructor_args
+    assert_equal Ruport::Data::Table.new(:column_names => %w[a b c]),
+                 Table(:column_names => %w[a b c])
+  end     
   
 end