rocx 0.5.7 → 0.5.8

data/test/properties/style_test.rb

@@ -1,30 +0,0 @@
-require "test_helper"
-
-class StylePropertyTest < PropertyTest
-  attr_reader :style
-
-  context "always" do
-    setup do
-      @style = Style.new("Nope Style 1")
-    end
-
-    should "set the right tag" do
-      assert_equal :pStyle, style.tag
-    end
-
-    should "set the right name" do
-      assert_equal "style", style.name
-    end
-  end
-
-  context "with a valid style" do
-    setup do
-      @style = Style.new("Nope Style 1")
-    end
-
-    should "return the proper XML" do
-      assert_equal "<w:pStyle w:val=\"Nope Style 1\"/>", xml(style)
-    end
-  end
-
-end

data/test/properties/supress_auto_hyphens_test.rb

@@ -1,50 +0,0 @@
-require "test_helper"
-
-class SupressAutoHyphensTest < PropertyTest
-  attr_reader :supress_auto_hyphens
-
-  context "always" do
-    setup do
-      @supress_auto_hyphens = SupressAutoHyphens.new(false)
-    end
-
-    should "have the right tag" do
-      assert_equal :supressAutoHyphens, supress_auto_hyphens.tag
-    end
-
-    should "have the right name" do
-      assert_equal "supress_auto_hyphens", supress_auto_hyphens.name
-    end
-  end
-
-  context "when the value is true, it" do
-    setup do
-      @supress_auto_hyphens = SupressAutoHyphens.new(true)
-    end
-
-    should "return XML" do
-      assert_equal "<w:supressAutoHyphens/>", xml(supress_auto_hyphens)
-    end
-  end
-
-  context "when the value is false, it" do
-    setup do
-      @supress_auto_hyphens = SupressAutoHyphens.new(false)
-    end
-
-    should "not return XML" do
-      assert_equal "", xml(supress_auto_hyphens)
-    end
-  end
-
-  context "when the value is nil, it" do
-    setup do
-      @supress_auto_hyphens = SupressAutoHyphens.new(nil)
-    end
-
-    should "not return XML" do
-      assert_equal "", xml(supress_auto_hyphens)
-    end
-  end
-
-end

data/test/properties/supress_line_numbers_test.rb

@@ -1,50 +0,0 @@
-require "test_helper"
-
-class SupressLineNumbersTest < PropertyTest
-  attr_reader :supress_line_numbers
-
-  context "always" do
-    setup do
-      @supress_line_numbers = SupressLineNumbers.new(false)
-    end
-
-    should "have the right tag" do
-      assert_equal :supressLineNumbers, supress_line_numbers.tag
-    end
-
-    should "have the right name" do
-      assert_equal "supress_line_numbers", supress_line_numbers.name
-    end
-  end
-
-  context "when the value is true, it" do
-    setup do
-      @supress_line_numbers = SupressLineNumbers.new(true)
-    end
-
-    should "return XML" do
-      assert_equal "<w:supressLineNumbers/>", xml(supress_line_numbers)
-    end
-  end
-
-  context "when the value is false, it" do
-    setup do
-      @supress_line_numbers = SupressLineNumbers.new(false)
-    end
-
-    should "not return XML" do
-      assert_equal "", xml(supress_line_numbers)
-    end
-  end
-
-  context "when the value is nil, it" do
-    setup do
-      @supress_line_numbers = SupressLineNumbers.new(nil)
-    end
-
-    should "not return XML" do
-      assert_equal "", xml(supress_line_numbers)
-    end
-  end
-
-end

data/test/properties/supress_overlap_test.rb

@@ -1,50 +0,0 @@
-require "test_helper"
-
-class SupressOverlapTest < PropertyTest
-  attr_reader :supress_overlap
-
-  context "always" do
-    setup do
-      @supress_overlap = SupressOverlap.new(false)
-    end
-
-    should "have the right tag" do
-      assert_equal :supressOverlap, supress_overlap.tag
-    end
-
-    should "have the right name" do
-      assert_equal "supress_overlap", supress_overlap.name
-    end
-  end
-
-  context "when the value is true, it" do
-    setup do
-      @supress_overlap = SupressOverlap.new(true)
-    end
-
-    should "return XML" do
-      assert_equal "<w:supressOverlap/>", xml(supress_overlap)
-    end
-  end
-
-  context "when the value is false, it" do
-    setup do
-      @supress_overlap = SupressOverlap.new(false)
-    end
-
-    should "not return XML" do
-      assert_equal "", xml(supress_overlap)
-    end
-  end
-
-  context "when the value is nil, it" do
-    setup do
-      @supress_overlap = SupressOverlap.new(nil)
-    end
-
-    should "not return XML" do
-      assert_equal "", xml(supress_overlap)
-    end
-  end
-
-end

data/test/properties/tab_test.rb

@@ -1,63 +0,0 @@
-require "test_helper"
-
-class TabTest < PropertyTest
-  attr_reader :tab
-
-  context "always" do
-    setup do
-      @tab = Tab.new(1234, :start)
-    end
-
-    should "have the right name" do
-      assert_equal "tab", tab.name
-    end
-
-    should "have the right tag" do
-      assert_equal :tab, tab.tag
-    end
-  end
-
-  context "when assigning bad position values, it" do
-    should "raise an exception" do
-      assert_raises ArgumentError do
-        @tab = Tab.new(:bad, :start)
-      end
-    end
-  end
-
-  context "when assigning bad type values, it" do
-    should "raise an exception" do
-      assert_raises ArgumentError do
-        @tab = Tab.new(1234, :bad)
-      end
-    end
-  end
-
-  context "when assigniing bad leader values, it" do
-    should "raise an exception" do
-      assert_raises ArgumentError do
-        @tab = Tab.new(1234, :clear, :bad)
-      end
-    end
-  end
-
-  context "with valid values, it" do
-    setup do
-      @tab = Tab.new(1234, :start)
-    end
-
-    should "return the right XML" do
-      assert_equal "<w:tab w:pos=\"1234\" w:val=\"start\"/>", xml(tab)
-    end
-  end
-
-  context "with valid values and a specified leader, it" do
-    setup do
-      @tab = Tab.new(1234, :start, :dot)
-    end
-
-    should "Return the right XML" do
-      assert_equal "<w:tab w:pos=\"1234\" w:val=\"start\" w:leader=\"dot\"/>", xml(tab)
-    end
-  end
-end

data/test/properties/tabs_test.rb

@@ -1,54 +0,0 @@
-require "test_helper"
-
-class TabsTest < PropertyTest
-  attr_reader :tabs
-
-  context "always" do
-    setup do
-      @tabs = Tabs.new
-    end
-
-    should "have the right name" do
-      assert_equal "tabs", tabs.name
-    end
-
-    should "have the right tag" do
-      assert_equal :tabs, tabs.tag
-    end
-  end
-
-  context "when trying to add tabs, it" do
-    setup do
-      @tabs = Tabs.new
-    end
-
-    should "raise an exception if the tab to be added isn't a tab at all" do
-      assert_raises ArgumentError do
-        tabs << []
-      end
-    end
-  end
-
-  context "when there are no tabs, it" do
-    setup do
-      @tabs = Tabs.new
-    end
-
-    should "not return any XML" do
-      assert_equal "", xml(tabs)
-    end
-  end
-
-  context "when there are tabs, it" do
-    setup do
-      @tabs = Tabs.new
-      tabs << Tab.new(1234, :start)
-      tabs << Tab.new(5678, :end, :heavy)
-    end
-
-    should "return the correct XML" do
-      assert_equal "<w:tabs>\n    <w:tab w:pos=\"1234\" w:val=\"start\"/>\n    <w:tab w:pos=\"5678\" w:val=\"end\" w:leader=\"heavy\"/>\n  </w:tabs>", xml(tabs)
-    end
-  end
-
-end

data/test/properties/text_direction_test.rb

@@ -1,100 +0,0 @@
-require "test_helper"
-
-class TextDirectionTest < PropertyTest
-  attr_reader :text_direction
-
-  context "always" do
-    setup do
-      @text_direction = TextDirection.new(:lr)
-    end
-
-    should "have the right tag" do
-      assert_equal :textDirection, text_direction.tag
-    end
-
-    should "have the right name" do
-      assert_equal "text_direction", text_direction.name
-    end
-  end
-
-  context "with valid values," do
-    context "like :lr, it" do
-      setup do
-        @text_direction = TextDirection.new(:lr)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textDirection w:val=\"lr\"/>", xml(text_direction)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :lrV, it" do
-      setup do
-        @text_direction = TextDirection.new(:lrV)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textDirection w:val=\"lrV\"/>", xml(text_direction)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :rl, it" do
-      setup do
-        @text_direction = TextDirection.new(:rl)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textDirection w:val=\"rl\"/>", xml(text_direction)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :rlV, it" do
-      setup do
-        @text_direction = TextDirection.new(:rlV)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textDirection w:val=\"rlV\"/>", xml(text_direction)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :tb, it" do
-      setup do
-        @text_direction = TextDirection.new(:tb)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textDirection w:val=\"tb\"/>", xml(text_direction)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :tbV, it" do
-      setup do
-        @text_direction = TextDirection.new(:tbV)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textDirection w:val=\"tbV\"/>", xml(text_direction)
-      end
-    end
-  end
-
-  context "with invalid values, it" do
-    should "raise an error" do
-      assert_raises ArgumentError do
-        @text_direction = TextDirection.new(:left_to_right)
-      end
-    end
-  end
-
-end

data/test/properties/textbox_tight_wrap_test.rb

@@ -1,88 +0,0 @@
-require "test_helper"
-
-class TextboxTightWrapTest < PropertyTest
-  attr_reader :textbox_tight_wrap
-
-  context "always" do
-    setup do
-      @textbox_tight_wrap = TextboxTightWrap.new(:allLines)
-    end
-
-    should "have the right tag" do
-      assert_equal :textboxTightWrap, textbox_tight_wrap.tag
-    end
-
-    should "have the right name" do
-      assert_equal "textbox_tight_wrap", textbox_tight_wrap.name
-    end
-  end
-
-  context "with valid values," do
-    context "like :allLines, it" do
-      setup do
-        @textbox_tight_wrap = TextboxTightWrap.new(:allLines)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textboxTightWrap w:val=\"allLines\"/>", xml(textbox_tight_wrap)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :firstAndLastLine, it" do
-      setup do
-        @textbox_tight_wrap = TextboxTightWrap.new(:firstAndLastLine)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textboxTightWrap w:val=\"firstAndLastLine\"/>", xml(textbox_tight_wrap)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :firstLineOnly, it" do
-      setup do
-        @textbox_tight_wrap = TextboxTightWrap.new(:firstLineOnly)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textboxTightWrap w:val=\"firstLineOnly\"/>", xml(textbox_tight_wrap)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :lastLineOnly, it" do
-      setup do
-        @textbox_tight_wrap = TextboxTightWrap.new(:lastLineOnly)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textboxTightWrap w:val=\"lastLineOnly\"/>", xml(textbox_tight_wrap)
-      end
-    end
-  end
-
-  context "with valid values," do
-    context "like :none, it" do
-      setup do
-        @textbox_tight_wrap = TextboxTightWrap.new(:none)
-      end
-
-      should "return the right XML" do
-        assert_equal "<w:textboxTightWrap w:val=\"none\"/>", xml(textbox_tight_wrap)
-      end
-    end
-  end
-
-  context "with invalid values, it" do
-    should "raise an error" do
-      assert_raises ArgumentError do
-        @textbox_tight_wrap = TextboxTightWrap.new(:something_terrible)
-      end
-    end
-  end
-
-end