roar 0.9.0 → 0.9.1

data/CHANGES.markdown

@@ -1,3 +1,8 @@
+h2. 0.9.1
+
+* Removed @Representer#to_attributes@ and @#from_attributes@.
+* Using representable-1.0.1 now.
+
 h2. 0.9.0
 
 * Using representable-0.12.x.

data/Rakefile

@@ -3,7 +3,7 @@ Bundler::GemHelper.install_tasks
 
 require 'rake/testtask'
 
-task :default => [:test, :testrails]
+task :default => [:test]
 
 Rake::TestTask.new(:test) do |test|
   test.libs << 'test'

data/lib/roar/rails/test_case.rb

@@ -1,12 +1,61 @@
-require 'test_xml/test_unit'
+#require 'test_xml/test_unit'
+require 'action_controller/test_case'
 
-ActionController::TestCase.class_eval do
+module Roar::Rails
+  module TestCase
+    def process(action, *args)
+      raise
+      if args.first.is_a?(String)
+        puts "YO"
+         request.env['RAW_POST_DATA'] = args.shift
+         method = args.pop
+         args << nil
+         args << method
+      end
+    
+      super
+    end
+    
+    def assert_response(status, headers={})  # FIXME: allow message.
+      super
+      
+      if headers.is_a?(Hash)
+        assert_headers(headers)
+      else
+        assert_body(headers)
+      end
+    end
+    
+    def assert_headers(headers)
+      headers.each_pair do |k,v|
+        assert_equal v, @response.headers[k]
+      end
+    end
+    
+    def assert_body(body, options={})
+      return assert_xml_equal body, @response.body if options[:format] == :xml  # FIXME: how do we know whether assert_xml is appropriate?
+      assert_equal body, @response.body
+    end
+  end
+end
+
+
+ActionController::TestCase::Behavior.class_eval do
   # FIXME: ugly monkey-patching.
   # TODO: test:
   #   put :create
   #   put :create, :format => :xml
   #   put :create, "<order/>", :format => :xml
   #   put :create, "<order/>"
+  
+  
+  include Roar::Rails::TestCase
+end
+
+RSpec::Rails::ControllerExampleGroup.class_eval do
+  #include Roar::Rails::TestCase
+  # FIXME: include module!
+  
   def process(action, *args)
     if args.first.is_a?(String)
        request.env['RAW_POST_DATA'] = args.shift
@@ -14,30 +63,7 @@ ActionController::TestCase.class_eval do
        args << nil
        args << method
     end
-    
-    super
-  end
   
-  def assert_response(status, headers={})  # FIXME: allow message.
     super
-    
-    if headers.is_a?(Hash)
-      assert_headers(headers)
-    else
-      assert_body(headers)
-    end
   end
-  
-  def assert_headers(headers)
-    headers.each_pair do |k,v|
-      assert_equal v, @response.headers[k]
-    end
-  end
-  
-  def assert_body(body, options={})
-    return assert_xml_equal body, @response.body if options[:format] == :xml  # FIXME: how do we know whether assert_xml is appropriate?
-    assert_equal body, @response.body
-  end
-  
-  
 end

data/lib/roar/representer.rb

@@ -5,40 +5,9 @@ module Roar
     def self.included(base)
       base.class_eval do
         include Representable
-        extend ClassMethods
       end
     end
     
-      
-    module ClassMethods
-      # Creates a representer instance and fills it with +attributes+.
-      # DISCUSS: remove.
-      def from_attributes(attributes) # DISCUSS: better move to #new? how do we handle the original #new then?
-        new.tap do |representer|
-          yield representer if block_given?
-          attributes.each { |p,v| representer.public_send("#{p}=", v) }
-        end
-      end
-    end
-    
-    
-    # Convert representer's attributes to a nested attributes hash.
-    def to_attributes
-      {}.tap do |attributes|
-        self.class.representable_attrs.each do |definition|
-          value = public_send(definition.getter)
-          
-          if definition.typed?
-            value = definition.apply(value) do |v|
-              v.to_attributes  # applied to each typed attribute (even in collections).
-            end
-          end
-          
-          attributes[definition.name] = value
-        end
-      end
-    end
-  
   private
     def before_serialize(*)
     end

data/lib/roar/representer/feature/hypermedia.rb

@@ -38,10 +38,10 @@ module Roar
           hyperlink_class = links_def.sought_type
           
           links_def.rel2block.each do |link|
-            links.update_link(hyperlink_class.from_attributes( # create Hyperlink representer.
-              :rel  => link[:rel],
-              :href => run_link_block(link[:block]))
-            )
+            links.update_link(hyperlink_class.new.tap do |hyperlink|  # create Hyperlink representer.
+              hyperlink.rel   = link[:rel]
+              hyperlink.href  = run_link_block(link[:block])
+            end)
           end
         end
         

data/lib/roar/representer/json.rb

@@ -52,6 +52,7 @@ module Roar
       # Encapsulates a hypermedia link.
       class Hyperlink
         include JSON
+        attr_accessor :rel, :href
         
         property :rel
         property :href

data/lib/roar/representer/xml.rb

@@ -50,12 +50,13 @@ module Roar
       # Encapsulates a hypermedia <link ...>.
       class Hyperlink
         # TODO: make XML a module to include in Hyperlink < Base.
+        attr_accessor :rel, :href
         include XML
         
         self.representation_wrap = :link
         
-        property :rel,  :from => "@rel"
-        property :href, :from => "@href"
+        property :rel,  :from => "rel", :attribute => true
+        property :href, :from => "href", :attribute => true
       end
       
     end

data/lib/roar/version.rb

@@ -1,3 +1,3 @@
 module Roar
-  VERSION = "0.9.0"
+  VERSION = "0.9.1"
 end

data/roar.gemspec

@@ -19,8 +19,7 @@ Gem::Specification.new do |s|
   s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
   s.require_paths = ["lib"]
   
-  s.add_runtime_dependency "representable", "~> 0.12"
-  s.add_runtime_dependency "hooks",         "~> 0.1.4"
+  s.add_runtime_dependency "representable", "~> 1.0.1"
   
   s.add_development_dependency "test_xml"
   s.add_development_dependency "minitest",         "~> 1.6.0"

data/test/http_verbs_feature_test.rb

@@ -10,19 +10,27 @@ class HttpVerbsTest < MiniTest::Spec
     property :label
   end
   
+  # keep this class clear of Roar modules.
+  class Band
+    attr_accessor :name, :label
+  end
+  
+  
   describe "HttpVerbs" do
     before do
-      @band = Object.new
+      @band = Band.new
       @band.extend(BandRepresenter)
       @band.extend(Roar::Representer::Feature::HttpVerbs)
     end
     
     describe "HttpVerbs.get" do
       it "returns instance from incoming representation" do
+        # let's pretend the user wants Roar class methods.
         @Band = Class.new do
           include Roar::Representer::JSON
           include BandRepresenter
           include Roar::Representer::Feature::HttpVerbs
+          attr_accessor :name, :label
         end
         @band = @Band.get("http://localhost:9999/bands/slayer", "application/json")
         assert_equal "Slayer", @band.name

data/test/hypermedia_feature_test.rb

@@ -6,6 +6,7 @@ class HypermediaTest
   describe "Hypermedia Feature" do
     before do
       @bookmarks = Class.new do
+        include AttributesContructor
         include Roar::Representer::XML
         include Roar::Representer::Feature::Hypermedia
         
@@ -19,6 +20,8 @@ class HypermediaTest
         property :id
         link :self do "http://bookmarks" end
         link :all do "http://bookmarks/all" end
+        
+        attr_accessor :id, :self, :all
       end
     end
     
@@ -29,7 +32,7 @@ class HypermediaTest
                             <id>1</id>
                             <link rel="self" href="http://bookmarks"/>
                             <link rel="all" href="http://bookmarks/all"/>
-                          </bookmarks>', @bookmarks_with_links.from_attributes(:id => 1).to_xml
+                          </bookmarks>', @bookmarks_with_links.new(:id => 1).to_xml
       end
       
       it "still works even if there are no links defined" do
@@ -40,7 +43,7 @@ class HypermediaTest
         assert_xml_equal '<bookmarks>
                             <id>1</id>
                           </bookmarks>', 
-          @bookmarks_with_links.from_attributes(:id => 1).to_xml(:links => false)
+          @bookmarks_with_links.new(:id => 1).to_xml(:links => false)
       end
     end
     
@@ -58,11 +61,13 @@ class HypermediaTest
       
       it "sets up links even when nested" do
         class Page
+          include AttributesContructor
           include Roar::Representer::JSON
           property :note, :class => Note
+          attr_accessor :note
         end
         
-        assert_equal "{\"note\":{\"links\":[{\"rel\":\"self\",\"href\":\"http://me\"}]}}", Page.from_attributes(note: Note.new).to_json
+        assert_equal "{\"note\":{\"links\":[{\"rel\":\"self\",\"href\":\"http://me\"}]}}", Page.new(note: Note.new).to_json
       end
     end
     
@@ -78,7 +83,7 @@ class HypermediaTest
         
         assert_kind_of Roar::Representer::Feature::Hypermedia::LinkCollection, doc.links
         assert_equal 1, doc.links.size
-        assert_equal({"rel"=>"self", "href"=>"http://bookmarks"}, doc.links.first.to_attributes) 
+        assert_equal(["self", "http://bookmarks"], [doc.links.first.rel, doc.links.first.href]) 
       end
       
       it "sets up an empty link list if no links found in the document" do
@@ -92,8 +97,14 @@ class HypermediaTest
         @set  = @bookmarks.new
         hyper = Roar::Representer::XML::Hyperlink
         
-        @set.links = [hyper.from_attributes({"rel" => "self", "href" => "http://self"}),
-                      hyper.from_attributes({"rel" => "next", "href" => "http://next"})]
+        @set.links = [
+          {:rel => "self", :href => "http://self"}, 
+          {:rel => "next", :href => "http://next"}].collect do |config|
+            link = hyper.new
+            link.rel  = config[:rel]
+            link.href = config[:href]
+            link
+          end
       end
       
       describe "#links=" do
@@ -160,7 +171,7 @@ class LinkCollectionTest < MiniTest::Spec
   describe "LinkCollection" do
     it "provides #update_link" do
       collection  = Roar::Representer::Feature::Hypermedia::LinkCollection.new
-      link        = Roar::Representer::XML::Hyperlink.from_attributes(rel: "self", href: "http://self")
+      link        = Roar::Representer::XML::Hyperlink.new(rel: "self", href: "http://self")
       
       collection.update_link(link)
       assert_equal 1, collection.size

data/test/json_representer_test.rb

@@ -8,6 +8,7 @@ class JsonRepresenterTest < MiniTest::Spec
     include Roar::Representer::JSON
     property :id
     property :pending
+    attr_accessor :id, :pending
   end
   
   
@@ -76,8 +77,10 @@ class JsonHypermediaTest
   describe "Hypermedia API" do
     before do
       @c = Class.new do
+        include AttributesContructor
         include Roar::Representer::JSON
         include Roar::Representer::Feature::Hypermedia
+        attr_accessor :id, :self, :next
         
         property :id
         
@@ -96,11 +99,11 @@ class JsonHypermediaTest
       @r = @c.from_json({:links => [{:rel => "self", :href => "http://self"}]}.to_json)
       
       assert_equal 1, @r.links.size
-      assert_equal({"rel"=>"self", "href"=>"http://self"}, @r.links.first.to_attributes) 
+      assert_equal(["self", "http://self"], [@r.links.first.rel, @r.links.first.href]) 
     end
     
     it "renders link: correctly in JSON" do
-      assert_equal "{\"id\":1,\"links\":[{\"rel\":\"self\",\"href\":\"http://self\"},{\"rel\":\"next\",\"href\":\"http://next/1\"}]}", @c.from_attributes(:id => 1).to_json
+      assert_equal "{\"id\":1,\"links\":[{\"rel\":\"self\",\"href\":\"http://self\"},{\"rel\":\"next\",\"href\":\"http://next/1\"}]}", @c.new(:id => 1).to_json
     end
   end
 end

data/test/representer_test.rb

@@ -17,27 +17,6 @@ class RepresenterTest < MiniTest::Spec
       @c.collection :songs
       assert_equal "songs", @c.representable_attrs.first.name
     end
-    
-    
-    describe "#from_attributes" do
-      it "accepts a block yielding the created representer instance" do
-        @c.class_eval { attr_accessor :name }
-        
-        assert_equal("Conan", @c.from_attributes({}) { |rep| rep.name = "Conan" }.name)
-      end
-      
-      it "copies known properties, only, but doesn't complain" do
-        @c.class_eval { property :id }
-        
-        assert_equal 1, @c.from_attributes("id" => 1, "unknown" => "don't use me").id
-      end
-      
-      it "accepts symbols and strings as property name" do
-        @c.class_eval { property :id }
-        
-        assert_equal @c.from_attributes(:id => 1).id, @c.from_attributes("id" => 1).id
-      end
-    end
   end
   
   describe "Inheritance" do
@@ -48,11 +27,13 @@ class RepresenterTest < MiniTest::Spec
       end
       
       class Person
+        include AttributesContructor
         include Roar::Representer::JSON
         include PersonRepresentation
+        attr_accessor :name
       end
       
-      assert_equal "{\"name\":\"Paulo\"}", Person.from_attributes(:name => "Paulo").to_json
+      assert_equal "{\"name\":\"Paulo\"}", Person.new(:name => "Paulo").to_json
     end
     
   end

data/test/test_helper.rb

@@ -8,6 +8,7 @@ require 'roar/representer'
 require 'roar/representer/feature/hypermedia'
 require 'roar/representer/feature/http_verbs'
 
+# TODO: 2BRM.
   module TestModel
     def self.included(base)
       base.extend ClassMethods
@@ -31,6 +32,15 @@ require 'roar/representer/feature/http_verbs'
     end
   end
 
+module AttributesContructor
+  def initialize(attrs={})
+    attrs.each do |k,v|
+      instance_variable_set("@#{k}", v)
+    end
+  end
+end
+
+
 
 class Item
   include TestModel

data/test/xml_representer_test.rb

@@ -1,16 +1,20 @@
 require 'test_helper'
 
 class ItemRepresenter
+  include AttributesContructor
   include Roar::Representer::XML
   self.representation_wrap= :item
   property :value
+  attr_accessor :value
 end
 
 class PositionRepresenter
+  include AttributesContructor
   include Roar::Representer::XML
   self.representation_wrap= :position
   property :id
   property :item, :class => ItemRepresenter
+  attr_accessor :id, :item
 end
 
 
@@ -50,6 +54,7 @@ class XMLRepresenterFunctionalTest < MiniTest::Spec
     include Roar::Representer::XML
     self.representation_wrap= :order
     property :id
+    attr_accessor :id
   end
   
   
@@ -62,14 +67,6 @@ class XMLRepresenterFunctionalTest < MiniTest::Spec
       @i.value = "Beer"
     end
     
-    describe "#to_attributes" do
-      it "returns a nested attributes hash" do
-        @r = PositionRepresenter.from_attributes("id" => 1, "item" => @i)
-        assert_equal({"id" => 1, "item" => {"value" => "Beer"}}, @r.to_attributes)
-      end
-    end
-    
-    
     describe "#to_xml" do
       it "serializes the model" do
         assert_xml_equal "<order/>", @r.to_xml
@@ -104,10 +101,11 @@ class XMLRepresenterFunctionalTest < MiniTest::Spec
         include Roar::Representer::XML
         property :id
         property :pending
+        attr_accessor :id, :pending
       end
     
       it "is aliased to #deserialize" do
-        assert_equal TestXmlRepresenter.from_xml("<order/>").to_attributes, TestXmlRepresenter.deserialize("<order/>").to_attributes
+        assert_equal TestXmlRepresenter.from_xml("<order/>").id, TestXmlRepresenter.deserialize("<order/>").id
       end
       
       it "accepts :except option" do
@@ -139,7 +137,7 @@ class XMLRepresenterFunctionalTest < MiniTest::Spec
     
     describe "with a typed attribute" do
       before do
-        @r = PositionRepresenter.from_attributes("id" => "1")
+        @r = PositionRepresenter.new("id" => "1")
       end
       
       it "#serialize skips empty :item" do
@@ -163,14 +161,16 @@ class XMLRepresenterFunctionalTest < MiniTest::Spec
     describe "with a typed list" do
       before do
         @c = Class.new do
+          include AttributesContructor
           include Roar::Representer::XML
           
           self.representation_wrap= :order
           property :id
           collection :items, :class => ItemRepresenter, :from => :item
+          attr_accessor :id, :items
         end
         
-        @r = @c.from_attributes("id" => 1)
+        @r = @c.new("id" => 1)
       end
       
       it "#serialize_model skips empty :item" do
@@ -178,7 +178,7 @@ class XMLRepresenterFunctionalTest < MiniTest::Spec
       end
       
       it "#serialize delegates to ItemXmlRepresenter#to_xml in list" do
-        @r.items = [ItemRepresenter.from_attributes("value" => "Bier")]
+        @r.items = [ItemRepresenter.new("value" => "Bier")]
         
         assert_xml_equal "<order><id>1</id><item><value>Bier</value></item></order>", 
           @r.to_xml

metadata

@@ -5,8 +5,8 @@ version: !ruby/object:Gem::Version
   segments: 
   - 0
   - 9
-  - 0
-  version: 0.9.0
+  - 1
+  version: 0.9.1
 platform: ruby
 authors: 
 - Nick Sutterer
@@ -14,7 +14,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-12-20 00:00:00 +01:00
+date: 2011-12-28 00:00:00 +01:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -26,30 +26,16 @@ dependencies:
     - - ~>
       - !ruby/object:Gem::Version 
         segments: 
-        - 0
-        - 12
-        version: "0.12"
-  type: :runtime
-  version_requirements: *id001
-- !ruby/object:Gem::Dependency 
-  name: hooks
-  prerelease: false
-  requirement: &id002 !ruby/object:Gem::Requirement 
-    none: false
-    requirements: 
-    - - ~>
-      - !ruby/object:Gem::Version 
-        segments: 
+        - 1
         - 0
         - 1
-        - 4
-        version: 0.1.4
+        version: 1.0.1
   type: :runtime
-  version_requirements: *id002
+  version_requirements: *id001
 - !ruby/object:Gem::Dependency 
   name: test_xml
   prerelease: false
-  requirement: &id003 !ruby/object:Gem::Requirement 
+  requirement: &id002 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - ">="
@@ -58,11 +44,11 @@ dependencies:
         - 0
         version: "0"
   type: :development
-  version_requirements: *id003
+  version_requirements: *id002
 - !ruby/object:Gem::Dependency 
   name: minitest
   prerelease: false
-  requirement: &id004 !ruby/object:Gem::Requirement 
+  requirement: &id003 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - ~>
@@ -73,11 +59,11 @@ dependencies:
         - 0
         version: 1.6.0
   type: :development
-  version_requirements: *id004
+  version_requirements: *id003
 - !ruby/object:Gem::Dependency 
   name: sinatra
   prerelease: false
-  requirement: &id005 !ruby/object:Gem::Requirement 
+  requirement: &id004 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - ~>
@@ -88,7 +74,7 @@ dependencies:
         - 6
         version: 1.2.6
   type: :development
-  version_requirements: *id005
+  version_requirements: *id004
 description: Streamlines the development of RESTful, resource-oriented architectures in Ruby.
 email: 
 - apotonick@gmail.com
@@ -113,7 +99,6 @@ files:
 - lib/roar/representer.rb
 - lib/roar/representer/feature/http_verbs.rb
 - lib/roar/representer/feature/hypermedia.rb
-- lib/roar/representer/feature/model_representing.rb
 - lib/roar/representer/feature/transport.rb
 - lib/roar/representer/json.rb
 - lib/roar/representer/xml.rb
@@ -160,7 +145,6 @@ files:
 - test/hypermedia_feature_test.rb
 - test/integration_test.rb
 - test/json_representer_test.rb
-- test/model_representing_test.rb
 - test/order_representers.rb
 - test/rails/controller_methods_test.rb
 - test/rails/rails_representer_methods_test.rb

data/lib/roar/representer/feature/model_representing.rb

@@ -1,80 +0,0 @@
-module Roar
-  module Representer
-    module Feature
-      module ModelRepresenting
-        attr_accessor :represented
-        
-        def self.included(base)
-          base.extend ClassMethods
-        end
-        
-        module ClassMethods
-          def for_model(represented)
-            # DISCUSS: split that into #for_model_attributes so it's easier overridable?
-            from_attributes(compute_attributes_for(represented)) { |rep| rep.represented = represented }
-          end
-          
-          def serialize_model(represented)
-            for_model(represented).serialize
-          end
-          
-        private
-          def definition_class
-            ModelDefinition
-          end
-          
-          # Called in for_model.
-          def compute_attributes_for(represented)
-            {}.tap do |attributes|
-              self.representable_attrs.each do |definition|
-                next unless definition.kind_of?(ModelDefinition)  # for now, really only use "our" model attributes.
-                definition.compute_attribute_for(represented, attributes)
-              end
-            end
-          end
-          
-          
-        end # ClassMethods
-        
-        # Properties that are mapped to a model attribute.
-        class ModelDefinition < ::Representable::Definition
-          def compute_attribute_for(represented, attributes)
-            value = represented.send(getter)
-                
-            if typed?
-              value = apply(value) do |v|
-                sought_type.for_model(v)  # applied to each typed attribute (even in collections).
-              end
-            end
-            
-            attributes[name] = value
-          end
-        end
-      end
-      
-      
-      module ActiveRecordMethods
-        def to_nested_attributes # FIXME: extract iterating with #to_attributes. 
-          {}.tap do |attributes|
-            self.class.representable_attrs.each do |definition|
-              next unless definition.kind_of?(ModelRepresenting::ModelDefinition)
-              
-              value = public_send(definition.getter)
-              
-              if definition.typed?
-                value = definition.apply(value) do |v|
-                  v.to_nested_attributes  # applied to each typed attribute (even in collections).
-                end
-              end
-              
-              key = definition.name
-              key = "#{key}_attributes" if definition.typed?
-              
-              attributes[key] = value
-            end
-          end
-        end
-      end
-    end
-  end
-end

data/test/model_representing_test.rb

@@ -1,119 +0,0 @@
-require 'test_helper'
-require 'roar/representer/feature/model_representing'
-
-class ModelRepresentingTest < MiniTest::Spec
-  describe "ModelRepresenting" do
-    class ItemRepresenter
-      include Roar::Representer::XML
-      include Roar::Representer::Feature::ModelRepresenting
-      self.representation_wrap= :item
-      property :value
-    end
-    
-    class PositionRepresenter
-      include Roar::Representer::XML
-      include Roar::Representer::Feature::ModelRepresenting
-      self.representation_wrap= :position
-      property :id
-      property :item, :class => ItemRepresenter
-    end
-    
-    class OrderRepresenter
-      include Roar::Representer::XML
-      include Roar::Representer::Feature::ModelRepresenting
-      self.representation_wrap= :order
-      property :id
-      collection :items, :class => ItemRepresenter
-    end
-    
-    describe "#definition_class" do
-      it "returns ModelDefinition" do
-        assert_equal Roar::Representer::Feature::ModelRepresenting::ModelDefinition, OrderRepresenter.send(:definition_class)
-      end
-      
-    end
-    
-    describe "#for_model" do
-      it "copies represented model attributes, nothing more" do
-        @o = Position.new("id" => 1, "item" => Item.new("value" => "Beer"))
-        @r = PositionRepresenter.for_model(@o)
-        assert_kind_of PositionRepresenter, @r
-        assert_equal 1, @r.id
-        
-        @i = @r.item
-        assert_kind_of ItemRepresenter, @i
-        assert_equal "Beer", @i.value
-      end
-      
-      it "references the model in @represented" do
-        @o = Position.new("id" => 1, "item" => @i = Item.new("value" => "Beer"))
-        
-        @r = PositionRepresenter.for_model(@o)
-        assert_equal @o, @r.represented
-        assert_equal @i, @r.item.represented
-      end
-    end
-    
-    describe "#serialize_model" do
-      it "skips empty :item" do
-        @o = Position.new("id" => 1)
-        assert_xml_equal "<position><id>1</id></position>", PositionRepresenter.serialize_model(@o)
-      end
-      
-      it "skips empty [:items]" do
-        assert_xml_equal "<order><id>1</id></order>", OrderRepresenter.serialize_model(Order.new("id" => 1))
-      end
-      
-      it "serializes the model" do
-        @o = Order.new("id" => 1, "items" => [Item.new("value" => "Beer")])
-        assert_xml_equal %{
-<order>
-  <id>1</id>
-  <item>
-    <value>Beer</value>
-  </item>
-</order>}"", OrderRepresenter.serialize_model(@o)
-      end
-      
-    end
-    
-    describe "#to_nested_attributes" do
-      it "provides a AR-compatible hash" do
-        @o = Order.new("id" => 1, "items" => [Item.new("value" => "Beer")])
-        @r = OrderRepresenter.for_model(@o)
-        
-        OrderRepresenter.class_eval do
-          include Roar::Representer::Feature::ActiveRecordMethods
-        end
-        ItemRepresenter.class_eval do
-          include Roar::Representer::Feature::ActiveRecordMethods
-        end
-        assert_equal({"id" => 1, "items_attributes" => [{"value" => "Beer"}]}, @r.to_nested_attributes) # DISCUSS: overwrite #to_attributes.
-      end
-      
-      it "doesn't include :links" do
-        @o = Order.new("id" => 1, "items" => [Item.new("value" => "Beer")])
-        
-        
-        
-        OrderRepresenter.class_eval do
-          include Roar::Representer::Feature::ActiveRecordMethods
-          include Roar::Representer::Feature::Hypermedia
-          link :self do
-        #    "bla"
-          end
-        end
-        ItemRepresenter.class_eval do
-          include Roar::Representer::Feature::ActiveRecordMethods
-          include Roar::Representer::Feature::Hypermedia
-          link :self do
-            
-          end
-        end
-        @r = OrderRepresenter.for_model(@o)
-        
-        assert_equal({"id" => 1, "items_attributes" => [{"value" => "Beer"}]}, @r.to_nested_attributes) # DISCUSS: overwrite #to_attributes.
-      end
-    end
-  end
-end