Adding setters for a Position block's height and width. Added tests f…

…or the getters.

app/models/position.rb

@@ -11,6 +11,22 @@ class Position < ActiveRecord::Base
   def width
     right-left
   end
+
+  # Enable the width to be set of a position.
+  # The right is adjusted relative to the left.
+  # A Concerto-1 style accessor, mainly used
+  # for importing templates.
+  def width=(size)
+    self.right = left + size
+  end
+
+  # Enabling the height to be set for a position.
+  # The bottom is adjusted relative to the top.
+  # A Concerto-1 style accessor, mainly used
+  # for importing templates.
+  def height=(size)
+    self.bottom = top + size
+  end
 
   # Compute the height of the position block.
   # Another Concerto-1 style attribute, figuring out

test/unit/position_test.rb

@@ -1,8 +1,31 @@
 require 'test_helper'
 
 class PositionTest < ActiveSupport::TestCase
-  # Replace this with your real tests.
-  test "the truth" do
-    assert true
+
+  # Test the height and width getters
+  test "width reads correctly" do
+    p = positions(:one)
+    assert_equal p.width-p.right+p.left, 0
+  end
+
+  test "height reads correctly" do
+    p = positions(:one)
+    assert_equal p.height-p.bottom+p.top, 0
+  end
+
+  # Test the height and width setters
+  test "width sets correctly" do
+    p = Position.new(:left => 0.1)
+    p.width = 0.5
+    assert_equal p.right, 0.6
+    assert_equal p.width, 0.5
+  end
+
+  test "height sets correctly" do
+    p = Position.new(:top => 0.1)
+    p.height = 0.5
+    assert_equal p.bottom, 0.6
+    assert_equal p.height, 0.5
   end
+
 end