caxlsx 3.1.1 → 3.2.0

data/test/drawing/tc_cat_axis_data.rb

@@ -1,27 +1,27 @@
-# require 'tc_helper.rb'
-
-# class TestCatAxisData < Test::Unit::TestCase
-
-#   def setup
-#     p = Axlsx::Package.new
-#     @ws = p.workbook.add_worksheet
-#     @chart = @ws.drawing.add_chart Axlsx::Bar3DChart
-#     @series = @chart.add_series :labels=>["zero", "one", "two"]
-#   end
-
-#   def test_initialize
-#     assert(@series.labels.is_a?Axlsx::SimpleTypedList)
-#     assert_equal(@series.labels, ["zero", "one", "two"])
-#   end
-
-#   def test_to_xml_string
-#     doc = Nokogiri::XML(@chart.to_xml_string)
-#     assert_equal(doc.xpath("//c:cat/c:strRef/c:f").size,1)
-#     assert_equal(doc.xpath("//c:strCache/c:ptCount[@val='#{@series.labels.size}']").size,1)
-#     @series.labels.each_with_index do |label, index|
-#       assert_equal(doc.xpath("//c:strCache/c:pt[@idx='#{index}']").size,1)
-#       assert_equal(doc.xpath("//c:strCache/c:pt/c:v[text()='#{label}']").size,1)
-#     end
-#   end
-
-# end
+# require 'tc_helper.rb'
+
+# class TestCatAxisData < Test::Unit::TestCase
+
+#   def setup
+#     p = Axlsx::Package.new
+#     @ws = p.workbook.add_worksheet
+#     @chart = @ws.drawing.add_chart Axlsx::Bar3DChart
+#     @series = @chart.add_series :labels=>["zero", "one", "two"]
+#   end
+
+#   def test_initialize
+#     assert(@series.labels.is_a?Axlsx::SimpleTypedList)
+#     assert_equal(@series.labels, ["zero", "one", "two"])
+#   end
+
+#   def test_to_xml_string
+#     doc = Nokogiri::XML(@chart.to_xml_string)
+#     assert_equal(doc.xpath("//c:cat/c:strRef/c:f").size,1)
+#     assert_equal(doc.xpath("//c:strCache/c:ptCount[@val='#{@series.labels.size}']").size,1)
+#     @series.labels.each_with_index do |label, index|
+#       assert_equal(doc.xpath("//c:strCache/c:pt[@idx='#{index}']").size,1)
+#       assert_equal(doc.xpath("//c:strCache/c:pt/c:v[text()='#{label}']").size,1)
+#     end
+#   end
+
+# end

data/test/drawing/tc_chart.rb

@@ -1,123 +1,123 @@
-require 'tc_helper.rb'
-
-class TestChart < Test::Unit::TestCase
-
-  def setup
-    @p = Axlsx::Package.new
-    ws = @p.workbook.add_worksheet
-    @row = ws.add_row ["one", 1, Time.now]
-    @chart = ws.add_chart Axlsx::Bar3DChart, :title => "fishery", :bg_color => "000000"
-  end
-
-  def teardown
-  end
-
-  def test_initialization
-    assert_equal(@p.workbook.charts.last,@chart, "the chart is in the workbook")
-    assert_equal(@chart.title.text, "fishery", "the title option has been applied")
-    assert((@chart.series.is_a?(Axlsx::SimpleTypedList) && @chart.series.empty?), "The series is initialized and empty")
-  end
-
-  def test_title
-    @chart.title.text = 'wowzer'
-    assert_equal(@chart.title.text, "wowzer", "the title text via a string")
-    assert_equal(@chart.title.cell, nil, "the title cell is nil as we set the title with text.")
-    @chart.title = @row.cells.first
-    assert_equal(@chart.title.text, "one", "the title text was set via cell reference")
-    assert_equal(@chart.title.cell, @row.cells.first)
-  end
-
-  def test_style
-    assert_raise(ArgumentError) { @chart.style = 49 }
-    assert_nothing_raised { @chart.style = 2 }
-    assert_equal(@chart.style, 2)
-  end
-
-  def test_to_from_marker_access
-    assert(@chart.to.is_a?(Axlsx::Marker))
-    assert(@chart.from.is_a?(Axlsx::Marker))
-  end
-
-  def test_bg_color
-    assert_raise(ArgumentError) { @chart.bg_color = 2 }
-    assert_nothing_raised { @chart.bg_color = "FFFFFF" }
-    assert_equal(@chart.bg_color, "FFFFFF")
-
-  end
-
-  def test_title_size
-    assert_raise(ArgumentError) { @chart.title_size = 2 }
-    assert_nothing_raised { @chart.title_size = "100" }
-    assert_equal(@chart.title.text_size, "100")
-  end
-
-  def test_vary_colors
-    assert_equal(true, @chart.vary_colors)
-    assert_raise(ArgumentError) { @chart.vary_colors = 7 }
-    assert_nothing_raised { @chart.vary_colors = false }
-    assert_equal(false, @chart.vary_colors)
-  end
-
-  def test_display_blanks_as
-    assert_equal(:gap, @chart.display_blanks_as, "default is not :gap")
-    assert_raise(ArgumentError, "did not validate possible values") { @chart.display_blanks_as = :hole }
-    assert_nothing_raised { @chart.display_blanks_as = :zero }
-    assert_nothing_raised { @chart.display_blanks_as = :span }
-    assert_equal(:span, @chart.display_blanks_as)
-  end
-
-  def test_start_at
-    @chart.start_at 15, 25
-    assert_equal(@chart.graphic_frame.anchor.from.col, 15)
-    assert_equal(@chart.graphic_frame.anchor.from.row, 25)
-    @chart.start_at @row.cells.first
-    assert_equal(@chart.graphic_frame.anchor.from.col, 0)
-    assert_equal(@chart.graphic_frame.anchor.from.row, 0)
-    @chart.start_at [5,6]
-    assert_equal(@chart.graphic_frame.anchor.from.col, 5)
-    assert_equal(@chart.graphic_frame.anchor.from.row, 6)
-
-  end
-
-  def test_end_at
-    @chart.end_at 25, 90
-    assert_equal(@chart.graphic_frame.anchor.to.col, 25)
-    assert_equal(@chart.graphic_frame.anchor.to.row, 90)
-    @chart.end_at @row.cells.last
-    assert_equal(@chart.graphic_frame.anchor.to.col, 2)
-    assert_equal(@chart.graphic_frame.anchor.to.row, 0)
-    @chart.end_at [10,11]
-    assert_equal(@chart.graphic_frame.anchor.to.col, 10)
-    assert_equal(@chart.graphic_frame.anchor.to.row, 11)
-
-  end
-
-  def test_add_series
-    s = @chart.add_series :data=>[0,1,2,3], :labels => ["one", 1, "anything"], :title=>"bob"
-    assert_equal(@chart.series.last, s, "series has been added to chart series collection")
-    assert_equal(s.title.text, "bob", "series title has been applied")
-  end
-
-  def test_pn
-    assert_equal(@chart.pn, "charts/chart1.xml")
-  end
-
-  def test_d_lbls
-    assert_equal(nil, @chart.instance_values[:d_lbls])
-    @chart.d_lbls.d_lbl_pos = :t
-    assert(@chart.d_lbls.is_a?(Axlsx::DLbls), 'DLbls instantiated on access')
-  end
-
-  def test_to_xml_string
-    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
-    doc = Nokogiri::XML(@chart.to_xml_string)
-    errors = schema.validate(doc).map { |error| puts error.message; error }
-    assert(errors.empty?, "error free validation")
-  end
-
-  def test_to_xml_string_for_display_blanks_as
-    @chart.display_blanks_as = :span
-    doc = Nokogiri::XML(@chart.to_xml_string)
-    assert_equal("span", doc.xpath("//c:dispBlanksAs").attr("val").value, "did not use the display_blanks_as configuration")
-  end
-end
+require 'tc_helper.rb'
+
+class TestChart < Test::Unit::TestCase
+
+  def setup
+    @p = Axlsx::Package.new
+    ws = @p.workbook.add_worksheet
+    @row = ws.add_row ["one", 1, Time.now]
+    @chart = ws.add_chart Axlsx::Bar3DChart, :title => "fishery", :bg_color => "000000"
+  end
+
+  def teardown
+  end
+
+  def test_initialization
+    assert_equal(@p.workbook.charts.last,@chart, "the chart is in the workbook")
+    assert_equal(@chart.title.text, "fishery", "the title option has been applied")
+    assert((@chart.series.is_a?(Axlsx::SimpleTypedList) && @chart.series.empty?), "The series is initialized and empty")
+  end
+
+  def test_title
+    @chart.title.text = 'wowzer'
+    assert_equal(@chart.title.text, "wowzer", "the title text via a string")
+    assert_equal(@chart.title.cell, nil, "the title cell is nil as we set the title with text.")
+    @chart.title = @row.cells.first
+    assert_equal(@chart.title.text, "one", "the title text was set via cell reference")
+    assert_equal(@chart.title.cell, @row.cells.first)
+  end
+
+  def test_style
+    assert_raise(ArgumentError) { @chart.style = 49 }
+    assert_nothing_raised { @chart.style = 2 }
+    assert_equal(@chart.style, 2)
+  end
+
+  def test_to_from_marker_access
+    assert(@chart.to.is_a?(Axlsx::Marker))
+    assert(@chart.from.is_a?(Axlsx::Marker))
+  end
+
+  def test_bg_color
+    assert_raise(ArgumentError) { @chart.bg_color = 2 }
+    assert_nothing_raised { @chart.bg_color = "FFFFFF" }
+    assert_equal(@chart.bg_color, "FFFFFF")
+
+  end
+
+  def test_title_size
+    assert_raise(ArgumentError) { @chart.title_size = 2 }
+    assert_nothing_raised { @chart.title_size = "100" }
+    assert_equal(@chart.title.text_size, "100")
+  end
+
+  def test_vary_colors
+    assert_equal(true, @chart.vary_colors)
+    assert_raise(ArgumentError) { @chart.vary_colors = 7 }
+    assert_nothing_raised { @chart.vary_colors = false }
+    assert_equal(false, @chart.vary_colors)
+  end
+
+  def test_display_blanks_as
+    assert_equal(:gap, @chart.display_blanks_as, "default is not :gap")
+    assert_raise(ArgumentError, "did not validate possible values") { @chart.display_blanks_as = :hole }
+    assert_nothing_raised { @chart.display_blanks_as = :zero }
+    assert_nothing_raised { @chart.display_blanks_as = :span }
+    assert_equal(:span, @chart.display_blanks_as)
+  end
+
+  def test_start_at
+    @chart.start_at 15, 25
+    assert_equal(@chart.graphic_frame.anchor.from.col, 15)
+    assert_equal(@chart.graphic_frame.anchor.from.row, 25)
+    @chart.start_at @row.cells.first
+    assert_equal(@chart.graphic_frame.anchor.from.col, 0)
+    assert_equal(@chart.graphic_frame.anchor.from.row, 0)
+    @chart.start_at [5,6]
+    assert_equal(@chart.graphic_frame.anchor.from.col, 5)
+    assert_equal(@chart.graphic_frame.anchor.from.row, 6)
+
+  end
+
+  def test_end_at
+    @chart.end_at 25, 90
+    assert_equal(@chart.graphic_frame.anchor.to.col, 25)
+    assert_equal(@chart.graphic_frame.anchor.to.row, 90)
+    @chart.end_at @row.cells.last
+    assert_equal(@chart.graphic_frame.anchor.to.col, 2)
+    assert_equal(@chart.graphic_frame.anchor.to.row, 0)
+    @chart.end_at [10,11]
+    assert_equal(@chart.graphic_frame.anchor.to.col, 10)
+    assert_equal(@chart.graphic_frame.anchor.to.row, 11)
+
+  end
+
+  def test_add_series
+    s = @chart.add_series :data=>[0,1,2,3], :labels => ["one", 1, "anything"], :title=>"bob"
+    assert_equal(@chart.series.last, s, "series has been added to chart series collection")
+    assert_equal(s.title.text, "bob", "series title has been applied")
+  end
+
+  def test_pn
+    assert_equal(@chart.pn, "charts/chart1.xml")
+  end
+
+  def test_d_lbls
+    assert_equal(nil, @chart.instance_values[:d_lbls])
+    @chart.d_lbls.d_lbl_pos = :t
+    assert(@chart.d_lbls.is_a?(Axlsx::DLbls), 'DLbls instantiated on access')
+  end
+
+  def test_to_xml_string
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
+    doc = Nokogiri::XML(@chart.to_xml_string)
+    errors = schema.validate(doc).map { |error| puts error.message; error }
+    assert(errors.empty?, "error free validation")
+  end
+
+  def test_to_xml_string_for_display_blanks_as
+    @chart.display_blanks_as = :span
+    doc = Nokogiri::XML(@chart.to_xml_string)
+    assert_equal("span", doc.xpath("//c:dispBlanksAs").attr("val").value, "did not use the display_blanks_as configuration")
+  end
+end

data/test/drawing/tc_d_lbls.rb

@@ -1,57 +1,57 @@
-require 'tc_helper'
-
-class TestDLbls < Test::Unit::TestCase
-
-  def setup
-    @d_lbls = Axlsx::DLbls.new(Axlsx::Pie3DChart)
-    @boolean_attributes =[:show_legend_key, 
-                          :show_val, 
-                          :show_cat_name, 
-                          :show_ser_name, 
-                          :show_percent, 
-                          :show_bubble_size, 
-                          :show_leader_lines]
-  end
-
-  def test_initialization
-    assert_equal(:bestFit, @d_lbls.d_lbl_pos)
-    @boolean_attributes.each do |attr|
-      assert_equal(false, @d_lbls.send(attr))
-    end
-  end
-
-  def test_initialization_with_optoins
-    
-    options_hash = Hash[*[@boolean_attributes.map { |name| [name, true] }] ]
-
-    d_lbls = Axlsx::DLbls.new(Axlsx::Pie3DChart, options_hash.merge( { :d_lbl_pos => :t }))
-   
-    @boolean_attributes.each do |attr|
-      assert_equal(true, d_lbls.send(attr), "boolean attributes set by options")
-    end
-    assert_equal(:t, d_lbls.d_lbl_pos, "d_lbl_pos set by options")
-  end
-  def test_d_lbl_pos
-    assert_raise(ArgumentError, 'invlaid label positions are rejected') { @d_lbls.d_lbl_pos = :upside_down }
-    assert_nothing_raised('accepts valid label position') { @d_lbls.d_lbl_pos = :ctr }
-  end
-
-  def test_boolean_attributes
-    @boolean_attributes.each do |attr|
-      assert_raise(ArgumentError, "rejects non boolean value for #{attr}") { @d_lbls.send("#{attr}=", :foo) }
-      assert_nothing_raised("accepts boolean value for #{attr}") { @d_lbls.send("#{attr}=", true) }
-      assert_nothing_raised("accepts boolean value for #{attr}") { @d_lbls.send("#{attr}=", false) }
-    end
-  end
-
-  def test_to_xml_string
-      str = '<?xml version="1.0" encoding="UTF-8"?>'
-      str << '<c:chartSpace xmlns:c="' << Axlsx::XML_NS_C << '" xmlns:a="' << Axlsx::XML_NS_A << '" xmlns:r="' << Axlsx::XML_NS_R << '">'
-      @d_lbls.to_xml_string(str) 
-      str << '</c:chartSpace>'
-      doc = Nokogiri::XML(str)
-      @d_lbls.instance_values.each do |name, value|
-        assert(doc.xpath("//c:#{Axlsx::camel(name, false)}[@val='#{value}']"), "#{name} is properly serialized")
-      end
-  end
-end
+require 'tc_helper'
+
+class TestDLbls < Test::Unit::TestCase
+
+  def setup
+    @d_lbls = Axlsx::DLbls.new(Axlsx::Pie3DChart)
+    @boolean_attributes =[:show_legend_key, 
+                          :show_val, 
+                          :show_cat_name, 
+                          :show_ser_name, 
+                          :show_percent, 
+                          :show_bubble_size, 
+                          :show_leader_lines]
+  end
+
+  def test_initialization
+    assert_equal(:bestFit, @d_lbls.d_lbl_pos)
+    @boolean_attributes.each do |attr|
+      assert_equal(false, @d_lbls.send(attr))
+    end
+  end
+
+  def test_initialization_with_optoins
+    
+    options_hash = Hash[*[@boolean_attributes.map { |name| [name, true] }] ]
+
+    d_lbls = Axlsx::DLbls.new(Axlsx::Pie3DChart, options_hash.merge( { :d_lbl_pos => :t }))
+   
+    @boolean_attributes.each do |attr|
+      assert_equal(true, d_lbls.send(attr), "boolean attributes set by options")
+    end
+    assert_equal(:t, d_lbls.d_lbl_pos, "d_lbl_pos set by options")
+  end
+  def test_d_lbl_pos
+    assert_raise(ArgumentError, 'invlaid label positions are rejected') { @d_lbls.d_lbl_pos = :upside_down }
+    assert_nothing_raised('accepts valid label position') { @d_lbls.d_lbl_pos = :ctr }
+  end
+
+  def test_boolean_attributes
+    @boolean_attributes.each do |attr|
+      assert_raise(ArgumentError, "rejects non boolean value for #{attr}") { @d_lbls.send("#{attr}=", :foo) }
+      assert_nothing_raised("accepts boolean value for #{attr}") { @d_lbls.send("#{attr}=", true) }
+      assert_nothing_raised("accepts boolean value for #{attr}") { @d_lbls.send("#{attr}=", false) }
+    end
+  end
+
+  def test_to_xml_string
+      str = '<?xml version="1.0" encoding="UTF-8"?>'
+      str << '<c:chartSpace xmlns:c="' << Axlsx::XML_NS_C << '" xmlns:a="' << Axlsx::XML_NS_A << '" xmlns:r="' << Axlsx::XML_NS_R << '">'
+      @d_lbls.to_xml_string(str) 
+      str << '</c:chartSpace>'
+      doc = Nokogiri::XML(str)
+      @d_lbls.instance_values.each do |name, value|
+        assert(doc.xpath("//c:#{Axlsx::camel(name, false)}[@val='#{value}']"), "#{name} is properly serialized")
+      end
+  end
+end

data/test/drawing/tc_data_source.rb

@@ -1,23 +1,23 @@
- require 'tc_helper.rb'
-
- class TestNumDataSource < Test::Unit::TestCase
-
-  def setup
-    @data_source = Axlsx::NumDataSource.new :data => ["1", "2", "3"]
-  end
-
-  def test_tag_name
-    assert_raise(ArgumentError) { @data_source.tag_name = :zVal }
-    assert_nothing_raised { @data_source.tag_name = :yVal }
-    assert_nothing_raised { @data_source.tag_name = :bubbleSize }
-  end
-
-  def test_to_xml_string_strLit
-    str = '<?xml version="1.0" encoding="UTF-8"?>'
-    str << '<c:chartSpace xmlns:c="' << Axlsx::XML_NS_C << '">'
-    str << @data_source.to_xml_string
-    doc = Nokogiri::XML(str)
-    assert_equal(doc.xpath("//c:val").size, 1)
-  end
-
- end
+ require 'tc_helper.rb'
+
+ class TestNumDataSource < Test::Unit::TestCase
+
+  def setup
+    @data_source = Axlsx::NumDataSource.new :data => ["1", "2", "3"]
+  end
+
+  def test_tag_name
+    assert_raise(ArgumentError) { @data_source.tag_name = :zVal }
+    assert_nothing_raised { @data_source.tag_name = :yVal }
+    assert_nothing_raised { @data_source.tag_name = :bubbleSize }
+  end
+
+  def test_to_xml_string_strLit
+    str = '<?xml version="1.0" encoding="UTF-8"?>'
+    str << '<c:chartSpace xmlns:c="' << Axlsx::XML_NS_C << '">'
+    str << @data_source.to_xml_string
+    doc = Nokogiri::XML(str)
+    assert_equal(doc.xpath("//c:val").size, 1)
+  end
+
+ end

data/test/drawing/tc_drawing.rb

@@ -1,80 +1,80 @@
-require 'tc_helper.rb'
-
-class TestDrawing < Test::Unit::TestCase
-  def setup
-    p = Axlsx::Package.new
-    @ws = p.workbook.add_worksheet
-
-  end
-
-  def test_initialization
-    assert(@ws.workbook.drawings.empty?)
-  end
-
-  def test_add_chart
-    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
-    assert(chart.is_a?(Axlsx::Pie3DChart), "must create a chart")
-    assert_equal(@ws.workbook.charts.last, chart, "must be added to workbook charts collection")
-    assert_equal(@ws.drawing.anchors.last.object.chart, chart, "an anchor has been created and holds a reference to this chart")
-    anchor = @ws.drawing.anchors.last
-    assert_equal([anchor.from.row, anchor.from.col], [0,0], "options for start at are applied")
-    assert_equal([anchor.to.row, anchor.to.col], [1,1], "options for start at are applied")
-    assert_equal(chart.title.text, "bob", "option for title is applied")
-  end
-
-  def test_add_image
-    src = File.dirname(__FILE__) + "/../fixtures/image1.jpeg"
-    image = @ws.add_image(:image_src => src, :start_at=>[0,0], :width=>600, :height=>400)
-    assert(@ws.drawing.anchors.last.is_a?(Axlsx::OneCellAnchor))
-    assert(image.is_a?(Axlsx::Pic))
-    assert_equal(600, image.width)
-    assert_equal(400, image.height)
-  end
-  def test_add_two_cell_anchor_image
-     src = File.dirname(__FILE__) + "/../fixtures/image1.jpeg"
-     image = @ws.add_image(:image_src => src, :start_at=>[0,0], :end_at => [15,0])
-    assert(@ws.drawing.anchors.last.is_a?(Axlsx::TwoCellAnchor))
-    assert(image.is_a?(Axlsx::Pic))
-  end
-  def test_charts
-    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
-    assert_equal(@ws.drawing.charts.last, chart, "add chart is returned")
-    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"nancy", :start_at=>[1,5], :end_at=>[5,10])
-    assert_equal(@ws.drawing.charts.last, chart, "add chart is returned")
-  end
-
-  def test_pn
-    @ws.add_chart(Axlsx::Pie3DChart)
-    assert_equal(@ws.drawing.pn, "drawings/drawing1.xml")
-  end
-
-  def test_rels_pn
-    @ws.add_chart(Axlsx::Pie3DChart)
-    assert_equal(@ws.drawing.rels_pn, "drawings/_rels/drawing1.xml.rels")
-  end
-
-  def test_index
-    @ws.add_chart(Axlsx::Pie3DChart)
-    assert_equal(@ws.drawing.index, @ws.workbook.drawings.index(@ws.drawing))
-  end
-
-  def test_relationships
-    @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
-    assert_equal(@ws.drawing.relationships.size, 1, "adding a chart adds a relationship")
-    @ws.add_chart(Axlsx::Pie3DChart, :title=>"nancy", :start_at=>[1,5], :end_at=>[5,10])
-    assert_equal(@ws.drawing.relationships.size, 2, "adding a chart adds a relationship")
-  end
-
-  def test_to_xml
-    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
-    @ws.add_chart(Axlsx::Pie3DChart)
-    doc = Nokogiri::XML(@ws.drawing.to_xml_string)
-    errors = []
-    schema.validate(doc).each do |error|
-      errors.push error
-      puts error.message
-    end
-    assert(errors.empty?, "error free validation")
-  end
-
-end
+require 'tc_helper.rb'
+
+class TestDrawing < Test::Unit::TestCase
+  def setup
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet
+
+  end
+
+  def test_initialization
+    assert(@ws.workbook.drawings.empty?)
+  end
+
+  def test_add_chart
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
+    assert(chart.is_a?(Axlsx::Pie3DChart), "must create a chart")
+    assert_equal(@ws.workbook.charts.last, chart, "must be added to workbook charts collection")
+    assert_equal(@ws.drawing.anchors.last.object.chart, chart, "an anchor has been created and holds a reference to this chart")
+    anchor = @ws.drawing.anchors.last
+    assert_equal([anchor.from.row, anchor.from.col], [0,0], "options for start at are applied")
+    assert_equal([anchor.to.row, anchor.to.col], [1,1], "options for start at are applied")
+    assert_equal(chart.title.text, "bob", "option for title is applied")
+  end
+
+  def test_add_image
+    src = File.dirname(__FILE__) + "/../fixtures/image1.jpeg"
+    image = @ws.add_image(:image_src => src, :start_at=>[0,0], :width=>600, :height=>400)
+    assert(@ws.drawing.anchors.last.is_a?(Axlsx::OneCellAnchor))
+    assert(image.is_a?(Axlsx::Pic))
+    assert_equal(600, image.width)
+    assert_equal(400, image.height)
+  end
+  def test_add_two_cell_anchor_image
+     src = File.dirname(__FILE__) + "/../fixtures/image1.jpeg"
+     image = @ws.add_image(:image_src => src, :start_at=>[0,0], :end_at => [15,0])
+    assert(@ws.drawing.anchors.last.is_a?(Axlsx::TwoCellAnchor))
+    assert(image.is_a?(Axlsx::Pic))
+  end
+  def test_charts
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
+    assert_equal(@ws.drawing.charts.last, chart, "add chart is returned")
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"nancy", :start_at=>[1,5], :end_at=>[5,10])
+    assert_equal(@ws.drawing.charts.last, chart, "add chart is returned")
+  end
+
+  def test_pn
+    @ws.add_chart(Axlsx::Pie3DChart)
+    assert_equal(@ws.drawing.pn, "drawings/drawing1.xml")
+  end
+
+  def test_rels_pn
+    @ws.add_chart(Axlsx::Pie3DChart)
+    assert_equal(@ws.drawing.rels_pn, "drawings/_rels/drawing1.xml.rels")
+  end
+
+  def test_index
+    @ws.add_chart(Axlsx::Pie3DChart)
+    assert_equal(@ws.drawing.index, @ws.workbook.drawings.index(@ws.drawing))
+  end
+
+  def test_relationships
+    @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
+    assert_equal(@ws.drawing.relationships.size, 1, "adding a chart adds a relationship")
+    @ws.add_chart(Axlsx::Pie3DChart, :title=>"nancy", :start_at=>[1,5], :end_at=>[5,10])
+    assert_equal(@ws.drawing.relationships.size, 2, "adding a chart adds a relationship")
+  end
+
+  def test_to_xml
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
+    @ws.add_chart(Axlsx::Pie3DChart)
+    doc = Nokogiri::XML(@ws.drawing.to_xml_string)
+    errors = []
+    schema.validate(doc).each do |error|
+      errors.push error
+      puts error.message
+    end
+    assert(errors.empty?, "error free validation")
+  end
+
+end