rocx 0.5.6 → 0.5.7

data/test/properties/snap_to_grid_test.rb

@@ -5,7 +5,7 @@ class SnapToGridTest < PropertyTest
 
   context "always" do
     setup do
-      @snap_to_grid = Rocx::Properties::SnapToGrid.new(:on)
+      @snap_to_grid = SnapToGrid.new(:on)
     end
 
     should "have the right tag" do
@@ -19,7 +19,7 @@ class SnapToGridTest < PropertyTest
 
   context "when the value is on, it" do
     setup do
-      @snap_to_grid = Rocx::Properties::SnapToGrid.new(:on)
+      @snap_to_grid = SnapToGrid.new(:on)
     end
 
     should "return XML to that effect" do
@@ -29,7 +29,7 @@ class SnapToGridTest < PropertyTest
 
   context "when the value is off, it" do
     setup do
-      @snap_to_grid = Rocx::Properties::SnapToGrid.new(:off)
+      @snap_to_grid = SnapToGrid.new(:off)
     end
 
     should "return XML to that effect" do
@@ -39,7 +39,7 @@ class SnapToGridTest < PropertyTest
 
   context "when the value is nil, it" do
     setup do
-      @snap_to_grid = Rocx::Properties::SnapToGrid.new(nil)
+      @snap_to_grid = SnapToGrid.new(nil)
     end
 
     should "not return XML" do

data/test/properties/spacing_test.rb

@@ -0,0 +1,248 @@
+require "test_helper"
+
+class SpacingTest < PropertyTest
+  attr_reader :spacing
+
+  context "always" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "have the right name" do
+      assert_equal "spacing", spacing.name
+    end
+
+    should "have the right tag" do
+      assert_equal :spacing, spacing.tag
+    end
+  end
+
+  context "for the after attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow positive integers" do
+      assert_nothing_raised do
+        spacing.after = 24
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.after = -24
+      end
+
+      assert_raises ArgumentError do
+        spacing.after = :big
+      end
+    end
+  end
+
+  context "for the after autospacing attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow :on" do
+      assert_nothing_raised do
+        spacing.after_auto = :on
+      end
+    end
+
+    should "allow :off" do
+      assert_nothing_raised do
+        spacing.after_auto = :off
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.after_auto = :on_and_off
+      end
+    end
+  end
+
+  context "for the after lines attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow positive integers" do
+      assert_nothing_raised do
+        spacing.after_lines = 24
+      end
+    end
+
+    should "allow negative integers" do
+      assert_nothing_raised do
+        spacing.after_lines = -24
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.after_lines = 2.5
+      end
+
+      assert_raises ArgumentError do
+        spacing.after_lines = :big
+      end
+    end
+  end
+
+  context "for the before attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow positive integers" do
+      assert_nothing_raised do
+        spacing.before = 24
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.before = -24
+      end
+
+      assert_raises ArgumentError do
+        spacing.before = :big
+      end
+    end
+  end
+
+  context "for the before autospacing attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow :on" do
+      assert_nothing_raised do
+        spacing.before_auto = :on
+      end
+    end
+
+    should "allow :off" do
+      assert_nothing_raised do
+        spacing.before_auto = :off
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.before_auto = :on_and_off
+      end
+    end
+  end
+
+  context "for the before lines attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow positive integers" do
+      assert_nothing_raised do
+        spacing.before_lines = 24
+      end
+    end
+
+    should "allow negative integers" do
+      assert_nothing_raised do
+        spacing.before_lines = -24
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.before_lines = 2.5
+      end
+
+      assert_raises ArgumentError do
+        spacing.before_lines = :big
+      end
+    end
+  end
+
+  context "for the line attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow positive integers" do
+      assert_nothing_raised do
+        spacing.line = 24
+      end
+    end
+
+    should "allow negative integers" do
+      assert_nothing_raised do
+        spacing.line = -24
+      end
+    end
+
+    should "not allow anything else" do
+      assert_raises ArgumentError do
+        spacing.line = 2.5
+      end
+
+      assert_raises ArgumentError do
+        spacing.line = :big
+      end
+    end
+  end
+
+  context "for the line rule attribute, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "allow :atLeast" do
+      assert_nothing_raised do
+        spacing.line_rule = :atLeast
+      end
+    end
+
+    should "allow :auto" do
+      assert_nothing_raised do
+        spacing.line_rule = :auto
+      end
+    end
+
+    should "allow :exact" do
+      assert_nothing_raised do
+        spacing.line_rule = :exact
+      end
+    end
+
+    should "not all anything else" do
+      assert_raises ArgumentError do
+        spacing.line_rule = :bad
+      end
+    end
+  end
+
+  context "when no attributes are set, it" do
+    setup do
+      @spacing = Spacing.new
+    end
+
+    should "not output any XML" do
+      assert_equal "", xml(spacing)
+    end
+  end
+
+  context "when attribuets are set with valid values, it" do
+    setup do
+      @spacing = Spacing.new
+      spacing.line = 276
+      spacing.line_rule = :auto
+    end
+
+    should "output the correct XML" do
+      assert_equal "<w:spacing w:line=\"276\" w:lineRule=\"auto\"/>", xml(spacing)
+    end
+  end
+
+end

data/test/properties/style_test.rb

@@ -0,0 +1,30 @@
+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

@@ -5,7 +5,7 @@ class SupressAutoHyphensTest < PropertyTest
 
   context "always" do
     setup do
-      @supress_auto_hyphens = Rocx::Properties::SupressAutoHyphens.new(false)
+      @supress_auto_hyphens = SupressAutoHyphens.new(false)
     end
 
     should "have the right tag" do
@@ -19,7 +19,7 @@ class SupressAutoHyphensTest < PropertyTest
 
   context "when the value is true, it" do
     setup do
-      @supress_auto_hyphens = Rocx::Properties::SupressAutoHyphens.new(true)
+      @supress_auto_hyphens = SupressAutoHyphens.new(true)
     end
 
     should "return XML" do
@@ -29,7 +29,7 @@ class SupressAutoHyphensTest < PropertyTest
 
   context "when the value is false, it" do
     setup do
-      @supress_auto_hyphens = Rocx::Properties::SupressAutoHyphens.new(false)
+      @supress_auto_hyphens = SupressAutoHyphens.new(false)
     end
 
     should "not return XML" do
@@ -39,7 +39,7 @@ class SupressAutoHyphensTest < PropertyTest
 
   context "when the value is nil, it" do
     setup do
-      @supress_auto_hyphens = Rocx::Properties::SupressAutoHyphens.new(nil)
+      @supress_auto_hyphens = SupressAutoHyphens.new(nil)
     end
 
     should "not return XML" do

data/test/properties/supress_line_numbers_test.rb

@@ -5,7 +5,7 @@ class SupressLineNumbersTest < PropertyTest
 
   context "always" do
     setup do
-      @supress_line_numbers = Rocx::Properties::SupressLineNumbers.new(false)
+      @supress_line_numbers = SupressLineNumbers.new(false)
     end
 
     should "have the right tag" do
@@ -19,7 +19,7 @@ class SupressLineNumbersTest < PropertyTest
 
   context "when the value is true, it" do
     setup do
-      @supress_line_numbers = Rocx::Properties::SupressLineNumbers.new(true)
+      @supress_line_numbers = SupressLineNumbers.new(true)
     end
 
     should "return XML" do
@@ -29,7 +29,7 @@ class SupressLineNumbersTest < PropertyTest
 
   context "when the value is false, it" do
     setup do
-      @supress_line_numbers = Rocx::Properties::SupressLineNumbers.new(false)
+      @supress_line_numbers = SupressLineNumbers.new(false)
     end
 
     should "not return XML" do
@@ -39,7 +39,7 @@ class SupressLineNumbersTest < PropertyTest
 
   context "when the value is nil, it" do
     setup do
-      @supress_line_numbers = Rocx::Properties::SupressLineNumbers.new(nil)
+      @supress_line_numbers = SupressLineNumbers.new(nil)
     end
 
     should "not return XML" do

data/test/properties/supress_overlap_test.rb

@@ -5,7 +5,7 @@ class SupressOverlapTest < PropertyTest
 
   context "always" do
     setup do
-      @supress_overlap = Rocx::Properties::SupressOverlap.new(false)
+      @supress_overlap = SupressOverlap.new(false)
     end
 
     should "have the right tag" do
@@ -19,7 +19,7 @@ class SupressOverlapTest < PropertyTest
 
   context "when the value is true, it" do
     setup do
-      @supress_overlap = Rocx::Properties::SupressOverlap.new(true)
+      @supress_overlap = SupressOverlap.new(true)
     end
 
     should "return XML" do
@@ -29,7 +29,7 @@ class SupressOverlapTest < PropertyTest
 
   context "when the value is false, it" do
     setup do
-      @supress_overlap = Rocx::Properties::SupressOverlap.new(false)
+      @supress_overlap = SupressOverlap.new(false)
     end
 
     should "not return XML" do
@@ -39,7 +39,7 @@ class SupressOverlapTest < PropertyTest
 
   context "when the value is nil, it" do
     setup do
-      @supress_overlap = Rocx::Properties::SupressOverlap.new(nil)
+      @supress_overlap = SupressOverlap.new(nil)
     end
 
     should "not return XML" do

data/test/properties/tab_test.rb

@@ -0,0 +1,63 @@
+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