doodle 0.0.4 → 0.0.5

data/spec/conversion_spec.rb

@@ -1,6 +1,4 @@
-$:.unshift(File.join(File.dirname(__FILE__), '../.'))
-
-require 'lib/spec_helper'
+require File.dirname(__FILE__) + '/spec_helper.rb'
 require 'date'
 
 describe Doodle, 'defaults which have not been set' do

data/spec/defaults_spec.rb

@@ -1,158 +1,137 @@
-$:.unshift(File.join(File.dirname(__FILE__), '../.'))
-
-require 'lib/spec_helper'
-require 'date'
-raise_if_defined :Foo, :Text, :Text2, :KeyValue
+require File.dirname(__FILE__) + '/spec_helper.rb'
 
 describe Doodle, 'attributes with defaults' do
-  
-  before(:each) do
-    raise_if_defined :Foo
-    class Foo
-      include Doodle::Helper
-      has :name, :default => 'D1'
-      class << self
-        has :metadata, :default => 'D2'
+  temporary_constant :Foo do
+    before(:each) do
+      class Foo
+        include Doodle::Helper
+        has :name, :default => 'D1'
+        class << self
+          has :metadata, :default => 'D2'
+        end
+      end
+      @foo = Foo.new
+      class << @foo
+        has :special, :default => 'D3'
       end
     end
-    @foo = Foo.new
-    class << @foo
-      has :special, :default => 'D3'
-    end
-  end
-  after :each do
-    undefine_const :Foo
-  end
   
-  it 'should have instance attribute default via class' do
-    Foo.attributes[:name].default.should == 'D1'
-  end
-  it 'should have instance attribute default via instance' do
-    @foo.attributes[:name].default.should == 'D1'
-  end
-  it 'should have class attribute default via class.meta' do
-    Foo.meta.attributes(false)[:metadata].default.should == 'D2'
-  end
-  it 'should have class attribute default via class.meta' do
-    Foo.meta.attributes[:metadata].default.should == 'D2'
-  end
-  it 'should have singleton attribute default via instance.meta.attributes(false)' do
-    @foo.meta.attributes(false)[:special].default.should == 'D3'
-  end
-  it 'should have singleton attribute default via instance.meta.attributes' do
-    @foo.meta.attributes[:special].default.should == 'D3'
-  end
-  it 'should have singleton attribute name by default' do
-    @foo.name.should == 'D1'
-  end
-  it 'should have singleton attribute name by default' do
-    Foo.metadata.should == 'D2'
-  end
-  it 'should have singleton attribute special by default' do
-    @foo.special.should == 'D3'
-  end
+    it 'should have instance attribute default via class' do
+      Foo.attributes[:name].default.should == 'D1'
+    end
+    it 'should have instance attribute default via instance' do
+      @foo.attributes[:name].default.should == 'D1'
+    end
+    it 'should have class attribute default via class.meta' do
+      Foo.meta.attributes(false)[:metadata].default.should == 'D2'
+    end
+    it 'should have class attribute default via class.meta' do
+      Foo.meta.attributes[:metadata].default.should == 'D2'
+    end
+    it 'should have singleton attribute default via instance.meta.attributes(false)' do
+      @foo.meta.attributes(false)[:special].default.should == 'D3'
+    end
+    it 'should have singleton attribute default via instance.meta.attributes' do
+      @foo.meta.attributes[:special].default.should == 'D3'
+    end
+    it 'should have singleton attribute name by default' do
+      @foo.name.should == 'D1'
+    end
+    it 'should have singleton attribute name by default' do
+      Foo.metadata.should == 'D2'
+    end
+    it 'should have singleton attribute special by default' do
+      @foo.special.should == 'D3'
+    end
 
-  it 'should not have a @name instance variable' do
-    @foo.instance_variables.include?("@name").should == false
-    @foo.instance_variables.sort.should == []
-  end
-  it 'should not have a @metadata class instance variable' do
-    Foo.instance_variables.include?("@metadata").should == false
-    Foo.instance_variables.sort.should == []
-  end
-  it 'should not have @special singleton instance variable' do
-    @foo.meta.instance_variables.include?("@special").should == false
-    @foo.meta.instance_variables.sort.should == []
+    it 'should not have a @name instance variable' do
+      @foo.instance_variables.include?("@name").should == false
+      @foo.instance_variables.sort.should == []
+    end
+    it 'should not have a @metadata class instance variable' do
+      Foo.instance_variables.include?("@metadata").should == false
+      Foo.instance_variables.sort.should == []
+    end
+    it 'should not have @special singleton instance variable' do
+      @foo.meta.instance_variables.include?("@special").should == false
+      @foo.meta.instance_variables.sort.should == []
+    end
   end
 end
 
 describe Doodle, 'defaults which have not been set' do
-  before :each do
-    raise_if_defined :Foo
-    class Foo < Doodle::Base
-      has :baz
+  temporary_constant :Foo do
+    before :each do
+      class Foo < Doodle::Base
+        has :baz
+      end
     end
-  end
-  after :each do
-    undefine_const :Foo
-  end
 
-  it 'should raise error if required attributes not passed to new' do
-    proc { foo = Foo.new }.should raise_error(ArgumentError)
-  end
+    it 'should raise error if required attributes not passed to new' do
+      proc { foo = Foo.new }.should raise_error(ArgumentError)
+    end
 
-  it 'should not raise error if required attributes passed to new' do
-    proc { foo = Foo.new(:baz => 'Hi' ) }.should_not raise_error
+    it 'should not raise error if required attributes passed to new' do
+      proc { foo = Foo.new(:baz => 'Hi' ) }.should_not raise_error
+    end
   end
-
 end
 
 describe Doodle, 'defaults which have been set' do
-  before :each do
-    raise_if_defined :Foo
-    class Foo < Doodle::Base
-      has :baz, :default => 'Hi!'
-      has :start do
-        default { Date.today }
+  temporary_constant :Foo do
+    before :each do
+      class Foo < Doodle::Base
+        has :baz, :default => 'Hi!'
+        has :start do
+          default { Date.today }
+        end
       end
+      @foo = Foo.new
     end
-    @foo = Foo.new
-  end
-  after :each do
-    undefine_const :Foo
-  end
 
-  it 'should have default value set from hash arg' do
-    @foo.baz.should == 'Hi!'
-  end
+    it 'should have default value set from hash arg' do
+      @foo.baz.should == 'Hi!'
+    end
 
-  it 'should have default value set from block' do
-    @foo.start.should == Date.today
+    it 'should have default value set from block' do
+      @foo.start.should == Date.today
+    end
   end
 end
 
 describe Doodle, "overriding inherited defaults" do
-  before :each do
-    raise_if_defined :Text, :Text2, :KeyValue
-    class KeyValue < Doodle::Base
-      has :name
-      has :value
-      def to_s
-        %[--#{name}="#{value}"]
+  temporary_constant :Text, :Text2, :KeyValue do
+    before :each do
+      class KeyValue < Doodle::Base
+        has :name
+        has :value
+      end
+      class Text < KeyValue
+        has :name, :default => "text"
+      end
+      class Text2 < Text
+        has :value, :default => "any2"
       end
     end
-    class Text < KeyValue
-      has :name, :default => "text"
-    end
-    class Text2 < Text
-      has :value, :default => "any2"
-    end
-  end
-  after :each do
-    undefine_const :Text2
-    undefine_const :Text
-    undefine_const :KeyValue
-  end
   
-  it 'should not raise error if initialized with required values' do
-    proc { Text.new(:value => 'any') }.should_not raise_error
-  end
+    it 'should not raise error if initialized with required values' do
+      proc { Text.new(:value => 'any') }.should_not raise_error
+    end
   
-  it 'should allow initialization using defaults' do
-    text = Text.new(:value => 'any')
-    text.name.should == 'text'
-    text.value.should == 'any'
-  end
+    it 'should allow initialization using defaults' do
+      text = Text.new(:value => 'any')
+      text.name.should == 'text'
+      text.value.should == 'any'
+    end
   
-  it 'should raise NoDefaultError if initialized without all required values' do
-    proc { KeyValue.new(:value => 'Enter name:') }.should raise_error(Doodle::NoDefaultError)
-  end
+    it 'should raise ArgumentError if initialized without all required values' do
+      proc { KeyValue.new(:value => 'Enter name:') }.should raise_error(ArgumentError)
+    end
   
-  it 'should allow initialization using inherited defaults' do
-    text = Text2.new
-    text.name.should == 'text'
-    text.value.should == 'any2'
+    it 'should allow initialization using inherited defaults' do
+      text = Text2.new
+      text.name.should == 'text'
+      text.value.should == 'any2'
+    end
   end
 end
-
-raise_if_defined :Foo, :Text, :Text2, :KeyValue

data/spec/doodle_spec.rb

@@ -1,297 +1,310 @@
-$:.unshift(File.join(File.dirname(__FILE__), '../.'))
-
-# require 'relpath'
-# loaddir_parent(__FILE__)
-require 'lib/spec_helper'
+require File.dirname(__FILE__) + '/spec_helper.rb'
 
 describe Doodle, 'basics' do
-  after :each do
-    undefine_const(:Foo)
-  end
-  before(:each) do
-    raise_if_defined :Foo
-    class Foo
-      include Doodle::Helper
+  temporary_constant :Foo do
+    before(:each) do
+      class Foo
+        include Doodle::Helper
+      end
+      @foo = Foo.new
+    end
+    after :each do
+      remove_ivars :foo
     end
-    @foo = Foo.new
-  end
 
-  it 'should have meta as synonym for singleton_class' do
-    Foo.singleton_class.should == Foo.meta
-    @foo.singleton_class.should == @foo.meta
+    it 'should have meta as synonym for singleton_class' do
+      Foo.singleton_class.should == Foo.meta
+      @foo.singleton_class.should == @foo.meta
+    end
   end
 end
 
 describe Doodle, 'instance attributes' do
-  after :each do
-    undefine_const(:Foo)
-  end
-  before(:each) do
-    raise_if_defined :Foo
-    class Foo
-      include Doodle::Helper
-      has :name, :default => nil
+  temporary_constant :Foo do
+    before(:each) do
+      class Foo
+        include Doodle::Helper
+        has :name, :default => nil
+      end
+      @foo = Foo.new
+    end
+    after :each do
+      remove_ivars :foo
     end
-    @foo = Foo.new
-  end
 
-  it 'should create attribute' do
-    @foo.name = 'Smee'
-    @foo.name.should == 'Smee'
-  end
+    it 'should create attribute' do
+      @foo.name = 'Smee'
+      @foo.name.should == 'Smee'
+    end
 
-  it 'should create attribute using getter_setter' do
-    @foo.name 'Smee'
-    @foo.name.should == 'Smee'
-  end
+    it 'should create attribute using getter_setter' do
+      @foo.name 'Smee'
+      @foo.name.should == 'Smee'
+    end
 
-  it 'should list instance attributes(false)' do
-    @foo.attributes(false).keys.should == []
-  end
+    it 'should list instance attributes(false)' do
+      @foo.attributes(false).keys.should == []
+    end
 
-  it 'should list instance attributes' do
-    @foo.attributes.keys.should == [:name]
-  end
+    it 'should list instance attributes' do
+      @foo.attributes.keys.should == [:name]
+    end
   
-  it 'should list all instance attributes(false) at class level' do
-    Foo.attributes(false).keys.should == [:name]
+    it 'should list all instance attributes(false) at class level' do
+      Foo.attributes(false).keys.should == [:name]
+    end
   end
-  
 end
 
 describe Doodle, 'class attributes(false)' do
-  after :each do
-    undefine_const(:Foo)
-  end
-  before(:each) do
-    raise_if_defined :Foo
-    class Foo
-      include Doodle::Helper
-      class << self
-        has :metadata
+  temporary_constant :Foo do
+    before(:each) do
+      class Foo
+        include Doodle::Helper
+        class << self
+          has :metadata
+        end
       end
+      @foo = Foo.new
+    end
+    after :each do
+      remove_ivars :foo
     end
-    @foo = Foo.new
-  end
 
-  it 'should create class attribute' do
-    Foo.metadata = 'Foo metadata'
-    Foo.metadata.should == 'Foo metadata'
-  end
+    it 'should create class attribute' do
+      Foo.metadata = 'Foo metadata'
+      Foo.metadata.should == 'Foo metadata'
+    end
 
-  it 'should access class attribute via self.class' do
-    @foo.class.metadata = '@foo metadata'
-    @foo.class.metadata.should == '@foo metadata'
-    Foo.metadata.should == '@foo metadata'
+    it 'should access class attribute via self.class' do
+      @foo.class.metadata = '@foo metadata'
+      @foo.class.metadata.should == '@foo metadata'
+      Foo.metadata.should == '@foo metadata'
 
-    Foo.metadata = 'Foo metadata'
-    Foo.metadata.should == 'Foo metadata'
-    @foo.class.metadata.should == 'Foo metadata'
-  end
+      Foo.metadata = 'Foo metadata'
+      Foo.metadata.should == 'Foo metadata'
+      @foo.class.metadata.should == 'Foo metadata'
+    end
 
-  it "should list all class's own attributes" do
-    Foo.meta.attributes(false).keys.should == [:metadata]
-  end
+    it "should list all class's own attributes" do
+      Foo.meta.attributes(false).keys.should == [:metadata]
+    end
   
-  it "should list all class's own attributes" do
-    Foo.meta.attributes.keys.should == [:metadata]
+    it "should list all class's own attributes" do
+      Foo.meta.attributes.keys.should == [:metadata]
+    end
   end
-
 end
 
 describe Doodle, 'inherited class attributes(false)' do
-  after :each do
-    undefine_const(:Foo)
-    undefine_const(:Bar)
-  end
-  before(:each) do
-    raise_if_defined :Foo, :Bar
-  
-    class Foo
-      include Doodle::Helper
-      has :name, :default => nil
-      class << self
-        has :metadata
+  temporary_constant :Foo, :Bar do
+    before(:each) do
+      class Foo
+        include Doodle::Helper
+        has :name, :default => nil
+        class << self
+          has :metadata
+        end
       end
-    end
-    class Bar < Foo
-      has :location, :default => nil
-      class << self
-        has :doc
+      class Bar < Foo
+        has :location, :default => nil
+        class << self
+          has :doc
+        end
       end
+      @foo = Foo.new
+      @bar = Bar.new
+    end
+    after :each do
+      remove_ivars :foo, :bar
     end
-    @foo = Foo.new
-    @bar = Bar.new
-  end
 
-  it 'should create inherited class attribute' do
-    Foo.metadata = 'Foo metadata'
-    Bar.metadata = 'Bar metadata'
-    Foo.metadata.should == 'Foo metadata'
-    Bar.metadata.should == 'Bar metadata'
-    Foo.metadata.should == 'Foo metadata'
-  end
+    it 'should create inherited class attribute' do
+      Foo.metadata = 'Foo metadata'
+      Bar.metadata = 'Bar metadata'
+      Foo.metadata.should == 'Foo metadata'
+      Bar.metadata.should == 'Bar metadata'
+      Foo.metadata.should == 'Foo metadata'
+    end
 
-  it 'should access class attribute via self.class' do
-    @foo.class.metadata = '@foo metadata'
-    @foo.class.metadata.should == '@foo metadata'
-    Foo.metadata.should == '@foo metadata'
-
-    Foo.metadata = 'Foo metadata'
-    Bar.metadata = 'Bar metadata'
-    Foo.metadata.should == 'Foo metadata'
-    Bar.metadata.should == 'Bar metadata'
-    Foo.metadata.should == 'Foo metadata'
-    @foo.class.metadata.should == 'Foo metadata'
-    @bar.class.metadata.should == 'Bar metadata'
-  end
+    it 'should access class attribute via self.class' do
+      @foo.class.metadata = '@foo metadata'
+      @foo.class.metadata.should == '@foo metadata'
+      Foo.metadata.should == '@foo metadata'
+
+      Foo.metadata = 'Foo metadata'
+      Bar.metadata = 'Bar metadata'
+      Foo.metadata.should == 'Foo metadata'
+      Bar.metadata.should == 'Bar metadata'
+      Foo.metadata.should == 'Foo metadata'
+      @foo.class.metadata.should == 'Foo metadata'
+      @bar.class.metadata.should == 'Bar metadata'
+    end
 
-  it 'should access inherited class attribute via self.class' do
-    @foo.class.metadata = '@foo metadata'
-    @foo.class.metadata.should == '@foo metadata'
-    Foo.metadata.should == '@foo metadata'
-    Foo.metadata = 'Foo metadata'
+    it 'should access inherited class attribute via self.class' do
+      @foo.class.metadata = '@foo metadata'
+      @foo.class.metadata.should == '@foo metadata'
+      Foo.metadata.should == '@foo metadata'
+      Foo.metadata = 'Foo metadata'
 
-    Bar.metadata = 'Bar metadata'
-    Bar.metadata.should == 'Bar metadata'
-    @bar.class.metadata.should == 'Bar metadata'
+      Bar.metadata = 'Bar metadata'
+      Bar.metadata.should == 'Bar metadata'
+      @bar.class.metadata.should == 'Bar metadata'
 
-    Foo.metadata.should == 'Foo metadata'
-    @foo.class.metadata.should == 'Foo metadata'
-  end
+      Foo.metadata.should == 'Foo metadata'
+      @foo.class.metadata.should == 'Foo metadata'
+    end
   
-  it "should list class's own attributes" do
-    Foo.meta.attributes(false).keys.should == [:metadata]
-  end
+    it "should list class's own attributes" do
+      Foo.meta.attributes(false).keys.should == [:metadata]
+    end
   
-  it "should list all class's own attributes" do
-    Foo.meta.attributes.keys.should == [:metadata]
-  end
+    it "should list all class's own attributes" do
+      Foo.meta.attributes.keys.should == [:metadata]
+    end
 
-  it "should list class's own attributes(false)" do
-    Bar.meta.attributes(false).keys.should == [:doc]
-  end
+    it "should list class's own attributes(false)" do
+      Bar.meta.attributes(false).keys.should == [:doc]
+    end
 
-  it "should list all inherited meta class attributes" do
-    Bar.meta.attributes.keys.should == [:metadata, :doc]
-  end
+    it "should list all inherited meta class attributes" do
+      Bar.meta.attributes.keys.should == [:metadata, :doc]
+    end
 
-  it "should list all inherited class's attributes" do
-    Bar.attributes.keys.should == [:name, :location]
+    it "should list all inherited class's attributes" do
+      Bar.attributes.keys.should == [:name, :location]
+    end
   end
 end
 
 describe Doodle, 'singleton class attributes' do
-  after :each do
-    undefine_const(:Foo)
-  end
-  before(:each) do
-    raise_if_defined :Foo
+  temporary_constant :Foo do
+    before(:each) do
   
-    class Foo
-      include Doodle::Helper
-      has :name, :default => nil
-      class << self
-        has :metadata
+      class Foo
+        include Doodle::Helper
+        has :name, :default => nil
+        class << self
+          has :metadata
+        end
+      end
+      @foo = Foo.new
+      class << @foo
+        has :special, :default => nil
       end
     end
-    @foo = Foo.new
-    class << @foo
-      has :special, :default => nil
+    after :each do
+      remove_ivars :foo
     end
-  end
   
-  it 'should allow creation of singleton class attributes' do
-    @foo.special = 42
-    @foo.special.should == 42
-  end
+    it 'should allow creation of singleton class attributes' do
+      @foo.special = 42
+      @foo.special.should == 42
+    end
 
-  it 'should list instance attributes' do
-    @foo.meta.attributes(false).keys.should == [:special]
-  end
+    it 'should list instance attributes' do
+      @foo.meta.attributes(false).keys.should == [:special]
+    end
 
-  it 'should list instance attributes' do
-    @foo.meta.attributes.keys.should == [:metadata, :special]
+    it 'should list instance attributes' do
+      @foo.meta.attributes.keys.should == [:metadata, :special]
+    end
   end
-  
 end
 
 describe Doodle, 'inherited singleton class attributes' do
-  after :each do
-    undefine_const(:Foo)
-    undefine_const(:Bar)
-  end
-  before(:each) do
-    raise_if_defined :Foo, :Bar
-    
-    class Foo
-      include Doodle::Helper
-      has :name, :default => nil
-      class << self
-        has :metadata
+  temporary_constant :Foo, :Bar do
+    before(:each) do
+      class Foo
+        include Doodle::Helper
+        has :name, :default => nil
+        class << self
+          has :metadata
+        end
       end
-    end
-    class Bar < Foo
-      has :info, :default => nil
-      class << self
-        has :doc
+      class Bar < Foo
+        has :info, :default => nil
+        class << self
+          has :doc
+        end
       end
-    end
 
-    @foo = Foo.new
-    class << @foo
-      has :special, :default => nil # must give default because already initialized
+      @foo = Foo.new
+      class << @foo
+        has :special, :default => nil # must give default because already initialized
+      end
+      @bar = Bar.new
+      @bar2 = Bar.new
+      class << @bar
+        has :extra
+      end
     end
-    @bar = Bar.new
-    @bar2 = Bar.new
-    class << @bar
-      has :extra
+    
+    after :each do
+      remove_ivars :foo, :bar, :bar2
     end
-  end
   
-  it 'should allow creation of singleton class attributes' do
-    @foo.special = 42
-    @foo.special.should == 42
-    @bar.extra = 84
-    @bar.extra.should == 84
-    proc { @foo.extra = 1 }.should raise_error(NoMethodError)
-    proc { @bar2.extra = 1 }.should raise_error(NoMethodError)
-    proc { @bar.special = 1 }.should raise_error(NoMethodError)
-  end
+    it 'should allow creation of singleton class attributes' do
+      @foo.special = 42
+      @foo.special.should == 42
+      @bar.extra = 84
+      @bar.extra.should == 84
+      proc { @foo.extra = 1 }.should raise_error(NoMethodError)
+      proc { @bar2.extra = 1 }.should raise_error(NoMethodError)
+      proc { @bar.special = 1 }.should raise_error(NoMethodError)
+    end
 
-  it 'should list instance attributes' do
-    @foo.class.attributes(false).keys.should == [:name]
-    @bar.class.attributes(false).keys.should == [:info]
-    @bar2.class.attributes(false).keys.should == [:info]
-  end
+    it 'should list instance attributes' do
+      @foo.class.attributes(false).keys.should == [:name]
+      @bar.class.attributes(false).keys.should == [:info]
+      @bar2.class.attributes(false).keys.should == [:info]
+    end
 
-  it 'should list instance meta attributes' do
-    @foo.meta.attributes(false).keys.should == [:special]
-    @bar.meta.attributes(false).keys.should == [:extra]
-  end
+    it 'should list instance meta attributes' do
+      @foo.meta.attributes(false).keys.should == [:special]
+      @bar.meta.attributes(false).keys.should == [:extra]
+    end
 
-  it 'should list instance attributes' do
-    @foo.meta.attributes.keys.should == [:metadata, :special]
-    @bar.meta.attributes.keys.should == [:metadata, :doc, :extra]
-  end
+    it 'should list instance attributes' do
+      @foo.meta.attributes.keys.should == [:metadata, :special]
+      @bar.meta.attributes.keys.should == [:metadata, :doc, :extra]
+    end
   
-  it 'should keep meta attributes separate' do
-     @foo.special = 'foo special'
-     @foo.meta.metadata = 'foo meta'
-#     @bar.meta.metadata = 'bar meta'
-#     @bar.meta.doc = 'bar doc'
-#     Foo.metadata = 'Foo meta'
-#     Bar.metadata = 'Bar meta'
-#     Bar.doc = 'Bar doc'
-
-#     @foo.meta.metadata.should == 'foo meta'
-#     @bar.meta.metadata.should == 'bar meta'
-#     @bar.meta.doc.should == 'bar doc'
-#     Foo.metadata.should == 'Foo meta'
-#     Bar.metadata.should == 'Bar meta'
-#     Bar.doc.should == 'Bar doc'
-
-#     proc { @foo.meta.doc = 1 }.should raise_error(NoMethodError)
+    it 'should keep meta attributes separate' do
+      @foo.special = 'foo special'
+      @foo.special.should == 'foo special'
+      @foo.meta.metadata = 'foo meta'
+      @foo.meta.metadata.should == 'foo meta'
+      # note: you cannot set any other values on @bar until you have set @bar.extra because it's defined as required
+      @bar.extra = 'bar extra'
+      @bar.extra.should == 'bar extra'
+      Foo.metadata = 'Foo meta'
+      Foo.metadata.should == 'Foo meta'
+      Bar.metadata = 'Bar meta'
+      Bar.metadata.should == 'Bar meta'
+      Bar.doc = 'Bar doc'
+      Bar.doc.should == 'Bar doc'
+
+      # now make sure they haven't bumped each other off
+      @foo.special.should == 'foo special'
+      @foo.meta.metadata.should == 'foo meta'
+      @bar.extra.should == 'bar extra'
+      Foo.metadata.should == 'Foo meta'
+      Bar.metadata.should == 'Bar meta'
+      Bar.doc.should == 'Bar doc'
+    end
+    
+    it 'should behave predictably when setting singleton attributes' do
+      @bar.extra = 'bar extra'
+      @bar.extra.should == 'bar extra'
+      # pending 'working out how to make this work' do
+      #   @bar.meta.metadata = 'bar meta metadata'
+      #   @bar.meta.metadata.should == 'bar meta metadata'
+      #   @bar.meta.doc = 'bar doc'
+      #   @bar.meta.doc.should == 'bar doc'
+      #   proc { @foo.meta.doc = 1 }.should raise_error(NoMethodError)
+      # end
+    end
   end
 end