comparison .svn/pristine/ee/ee3e0d946d377acd7e76d501db77540601a10ca7.svn-base @ 1295:622f24f53b42 redmine-2.3

Update to Redmine SVN revision 11972 on 2.3-stable branch

+require 'spec_helper'
+
+describe "AwesomeNestedSet" do
+  before(:all) do
+    self.class.fixtures :categories, :departments, :notes, :things, :brokens
+  end
+
+  describe "defaults" do
+    it "should have left_column_default" do
+      Default.acts_as_nested_set_options[:left_column].should == 'lft'
+    end
+
+    it "should have right_column_default" do
+      Default.acts_as_nested_set_options[:right_column].should == 'rgt'
+    end
+
+    it "should have parent_column_default" do
+      Default.acts_as_nested_set_options[:parent_column].should == 'parent_id'
+    end
+
+    it "should have scope_default" do
+      Default.acts_as_nested_set_options[:scope].should be_nil
+    end
+
+    it "should have left_column_name" do
+      Default.left_column_name.should == 'lft'
+      Default.new.left_column_name.should == 'lft'
+      RenamedColumns.left_column_name.should == 'red'
+      RenamedColumns.new.left_column_name.should == 'red'
+    end
+
+    it "should have right_column_name" do
+      Default.right_column_name.should == 'rgt'
+      Default.new.right_column_name.should == 'rgt'
+      RenamedColumns.right_column_name.should == 'black'
+      RenamedColumns.new.right_column_name.should == 'black'
+    end
+
+    it "should have parent_column_name" do
+      Default.parent_column_name.should == 'parent_id'
+      Default.new.parent_column_name.should == 'parent_id'
+      RenamedColumns.parent_column_name.should == 'mother_id'
+      RenamedColumns.new.parent_column_name.should == 'mother_id'
+    end
+  end
+
+  it "creation_with_altered_column_names" do
+    lambda {
+      RenamedColumns.create!()
+    }.should_not raise_exception
+  end
+
+  it "creation when existing record has nil left column" do
+    assert_nothing_raised do
+      Broken.create!
+    end
+  end
+  
+  it "quoted_left_column_name" do
+    quoted = Default.connection.quote_column_name('lft')
+    Default.quoted_left_column_name.should == quoted
+    Default.new.quoted_left_column_name.should == quoted
+  end
+
+  it "quoted_right_column_name" do
+    quoted = Default.connection.quote_column_name('rgt')
+    Default.quoted_right_column_name.should == quoted
+    Default.new.quoted_right_column_name.should == quoted
+  end
+
+  it "left_column_protected_from_assignment" do
+    lambda {
+      Category.new.lft = 1
+    }.should raise_exception(ActiveRecord::ActiveRecordError)
+  end
+
+  it "right_column_protected_from_assignment" do
+    lambda {
+      Category.new.rgt = 1
+    }.should raise_exception(ActiveRecord::ActiveRecordError)
+  end
+
+  it "scoped_appends_id" do
+    ScopedCategory.acts_as_nested_set_options[:scope].should == :organization_id
+  end
+
+  it "roots_class_method" do
+    Category.roots.should == Category.find_all_by_parent_id(nil)
+  end
+
+  it "root_class_method" do
+    Category.root.should == categories(:top_level)
+  end
+
+  it "root" do
+    categories(:child_3).root.should == categories(:top_level)
+  end
+
+  it "root?" do
+    categories(:top_level).root?.should be_true
+    categories(:top_level_2).root?.should be_true
+  end
+
+  it "leaves_class_method" do
+    Category.find(:all, :conditions => "#{Category.right_column_name} - #{Category.left_column_name} = 1").should == Category.leaves
+    Category.leaves.count.should == 4
+    Category.leaves.should include(categories(:child_1))
+    Category.leaves.should include(categories(:child_2_1))
+    Category.leaves.should include(categories(:child_3))
+    Category.leaves.should include(categories(:top_level_2))
+  end
+
+  it "leaf" do
+    categories(:child_1).leaf?.should be_true
+    categories(:child_2_1).leaf?.should be_true
+    categories(:child_3).leaf?.should be_true
+    categories(:top_level_2).leaf?.should be_true
+
+    categories(:top_level).leaf?.should be_false
+    categories(:child_2).leaf?.should be_false
+    Category.new.leaf?.should be_false
+  end
+
+
+  it "parent" do
+    categories(:child_2_1).parent.should == categories(:child_2)
+  end
+
+  it "self_and_ancestors" do
+    child = categories(:child_2_1)
+    self_and_ancestors = [categories(:top_level), categories(:child_2), child]
+    self_and_ancestors.should == child.self_and_ancestors
+  end
+
+  it "ancestors" do
+    child = categories(:child_2_1)
+    ancestors = [categories(:top_level), categories(:child_2)]
+    ancestors.should == child.ancestors
+  end
+
+  it "self_and_siblings" do
+    child = categories(:child_2)
+    self_and_siblings = [categories(:child_1), child, categories(:child_3)]
+    self_and_siblings.should == child.self_and_siblings
+    lambda do
+      tops = [categories(:top_level), categories(:top_level_2)]
+      assert_equal tops, categories(:top_level).self_and_siblings
+    end.should_not raise_exception
+  end
+
+  it "siblings" do
+    child = categories(:child_2)
+    siblings = [categories(:child_1), categories(:child_3)]
+    siblings.should == child.siblings
+  end
+
+  it "leaves" do
+    leaves = [categories(:child_1), categories(:child_2_1), categories(:child_3)]
+    categories(:top_level).leaves.should == leaves
+  end
+
+  it "level" do
+    categories(:top_level).level.should == 0
+    categories(:child_1).level.should == 1
+    categories(:child_2_1).level.should == 2
+  end
+
+  it "has_children?" do
+    categories(:child_2_1).children.empty?.should be_true
+    categories(:child_2).children.empty?.should be_false
+    categories(:top_level).children.empty?.should be_false
+  end
+
+  it "self_and_descendents" do
+    parent = categories(:top_level)
+    self_and_descendants = [parent, categories(:child_1), categories(:child_2),
+      categories(:child_2_1), categories(:child_3)]
+    self_and_descendants.should == parent.self_and_descendants
+    self_and_descendants.count.should == parent.self_and_descendants.count
+  end
+
+  it "descendents" do
+    lawyers = Category.create!(:name => "lawyers")
+    us = Category.create!(:name => "United States")
+    us.move_to_child_of(lawyers)
+    patent = Category.create!(:name => "Patent Law")
+    patent.move_to_child_of(us)
+    lawyers.reload
+
+    lawyers.children.size.should == 1
+    us.children.size.should == 1
+    lawyers.descendants.size.should == 2
+  end
+
+  it "self_and_descendents" do
+    parent = categories(:top_level)
+    descendants = [categories(:child_1), categories(:child_2),
+      categories(:child_2_1), categories(:child_3)]
+    descendants.should == parent.descendants
+  end
+
+  it "children" do
+    category = categories(:top_level)
+    category.children.each {|c| category.id.should == c.parent_id }
+  end
+
+  it "order_of_children" do
+    categories(:child_2).move_left
+    categories(:child_2).should == categories(:top_level).children[0]
+    categories(:child_1).should == categories(:top_level).children[1]
+    categories(:child_3).should == categories(:top_level).children[2]
+  end
+
+  it "is_or_is_ancestor_of?" do
+    categories(:top_level).is_or_is_ancestor_of?(categories(:child_1)).should be_true
+    categories(:top_level).is_or_is_ancestor_of?(categories(:child_2_1)).should be_true
+    categories(:child_2).is_or_is_ancestor_of?(categories(:child_2_1)).should be_true
+    categories(:child_2_1).is_or_is_ancestor_of?(categories(:child_2)).should be_false
+    categories(:child_1).is_or_is_ancestor_of?(categories(:child_2)).should be_false
+    categories(:child_1).is_or_is_ancestor_of?(categories(:child_1)).should be_true
+  end
+
+  it "is_ancestor_of?" do
+    categories(:top_level).is_ancestor_of?(categories(:child_1)).should be_true
+    categories(:top_level).is_ancestor_of?(categories(:child_2_1)).should be_true
+    categories(:child_2).is_ancestor_of?(categories(:child_2_1)).should be_true
+    categories(:child_2_1).is_ancestor_of?(categories(:child_2)).should be_false
+    categories(:child_1).is_ancestor_of?(categories(:child_2)).should be_false
+    categories(:child_1).is_ancestor_of?(categories(:child_1)).should be_false
+  end
+
+  it "is_or_is_ancestor_of_with_scope" do
+    root = ScopedCategory.root
+    child = root.children.first
+    root.is_or_is_ancestor_of?(child).should be_true
+    child.update_attribute :organization_id, 'different'
+    root.is_or_is_ancestor_of?(child).should be_false
+  end
+
+  it "is_or_is_descendant_of?" do
+    categories(:child_1).is_or_is_descendant_of?(categories(:top_level)).should be_true
+    categories(:child_2_1).is_or_is_descendant_of?(categories(:top_level)).should be_true
+    categories(:child_2_1).is_or_is_descendant_of?(categories(:child_2)).should be_true
+    categories(:child_2).is_or_is_descendant_of?(categories(:child_2_1)).should be_false
+    categories(:child_2).is_or_is_descendant_of?(categories(:child_1)).should be_false
+    categories(:child_1).is_or_is_descendant_of?(categories(:child_1)).should be_true
+  end
+
+  it "is_descendant_of?" do
+    categories(:child_1).is_descendant_of?(categories(:top_level)).should be_true
+    categories(:child_2_1).is_descendant_of?(categories(:top_level)).should be_true
+    categories(:child_2_1).is_descendant_of?(categories(:child_2)).should be_true
+    categories(:child_2).is_descendant_of?(categories(:child_2_1)).should be_false
+    categories(:child_2).is_descendant_of?(categories(:child_1)).should be_false
+    categories(:child_1).is_descendant_of?(categories(:child_1)).should be_false
+  end
+
+  it "is_or_is_descendant_of_with_scope" do
+    root = ScopedCategory.root
+    child = root.children.first
+    child.is_or_is_descendant_of?(root).should be_true
+    child.update_attribute :organization_id, 'different'
+    child.is_or_is_descendant_of?(root).should be_false
+  end
+
+  it "same_scope?" do
+    root = ScopedCategory.root
+    child = root.children.first
+    child.same_scope?(root).should be_true
+    child.update_attribute :organization_id, 'different'
+    child.same_scope?(root).should be_false
+  end
+
+  it "left_sibling" do
+    categories(:child_1).should == categories(:child_2).left_sibling
+    categories(:child_2).should == categories(:child_3).left_sibling
+  end
+
+  it "left_sibling_of_root" do
+    categories(:top_level).left_sibling.should be_nil
+  end
+
+  it "left_sibling_without_siblings" do
+    categories(:child_2_1).left_sibling.should be_nil
+  end
+
+  it "left_sibling_of_leftmost_node" do
+    categories(:child_1).left_sibling.should be_nil
+  end
+
+  it "right_sibling" do
+    categories(:child_3).should == categories(:child_2).right_sibling
+    categories(:child_2).should == categories(:child_1).right_sibling
+  end
+
+  it "right_sibling_of_root" do
+    categories(:top_level_2).should == categories(:top_level).right_sibling
+    categories(:top_level_2).right_sibling.should be_nil
+  end
+
+  it "right_sibling_without_siblings" do
+    categories(:child_2_1).right_sibling.should be_nil
+  end
+
+  it "right_sibling_of_rightmost_node" do
+    categories(:child_3).right_sibling.should be_nil
+  end
+
+  it "move_left" do
+    categories(:child_2).move_left
+    categories(:child_2).left_sibling.should be_nil
+    categories(:child_1).should == categories(:child_2).right_sibling
+    Category.valid?.should be_true
+  end
+
+  it "move_right" do
+    categories(:child_2).move_right
+    categories(:child_2).right_sibling.should be_nil
+    categories(:child_3).should == categories(:child_2).left_sibling
+    Category.valid?.should be_true
+  end
+
+  it "move_to_left_of" do
+    categories(:child_3).move_to_left_of(categories(:child_1))
+    categories(:child_3).left_sibling.should be_nil
+    categories(:child_1).should == categories(:child_3).right_sibling
+    Category.valid?.should be_true
+  end
+
+  it "move_to_right_of" do
+    categories(:child_1).move_to_right_of(categories(:child_3))
+    categories(:child_1).right_sibling.should be_nil
+    categories(:child_3).should == categories(:child_1).left_sibling
+    Category.valid?.should be_true
+  end
+
+  it "move_to_root" do
+    categories(:child_2).move_to_root
+    categories(:child_2).parent.should be_nil
+    categories(:child_2).level.should == 0
+    categories(:child_2_1).level.should == 1
+    categories(:child_2).left.should == 1
+    categories(:child_2).right.should == 4
+    Category.valid?.should be_true
+  end
+
+  it "move_to_child_of" do
+    categories(:child_1).move_to_child_of(categories(:child_3))
+    categories(:child_3).id.should == categories(:child_1).parent_id
+    Category.valid?.should be_true
+  end
+
+  it "move_to_child_of_appends_to_end" do
+    child = Category.create! :name => 'New Child'
+    child.move_to_child_of categories(:top_level)
+    child.should == categories(:top_level).children.last
+  end
+
+  it "subtree_move_to_child_of" do
+    categories(:child_2).left.should == 4
+    categories(:child_2).right.should == 7
+
+    categories(:child_1).left.should == 2
+    categories(:child_1).right.should == 3
+
+    categories(:child_2).move_to_child_of(categories(:child_1))
+    Category.valid?.should be_true
+    categories(:child_1).id.should == categories(:child_2).parent_id
+
+    categories(:child_2).left.should == 3
+    categories(:child_2).right.should == 6
+    categories(:child_1).left.should == 2
+    categories(:child_1).right.should == 7
+  end
+
+  it "slightly_difficult_move_to_child_of" do
+    categories(:top_level_2).left.should == 11
+    categories(:top_level_2).right.should == 12
+
+    # create a new top-level node and move single-node top-level tree inside it.
+    new_top = Category.create(:name => 'New Top')
+    new_top.left.should == 13
+    new_top.right.should == 14
+
+    categories(:top_level_2).move_to_child_of(new_top)
+
+    Category.valid?.should be_true
+    new_top.id.should == categories(:top_level_2).parent_id
+
+    categories(:top_level_2).left.should == 12
+    categories(:top_level_2).right.should == 13
+    new_top.left.should == 11
+    new_top.right.should == 14
+  end
+
+  it "difficult_move_to_child_of" do
+    categories(:top_level).left.should == 1
+    categories(:top_level).right.should == 10
+    categories(:child_2_1).left.should == 5
+    categories(:child_2_1).right.should == 6
+
+    # create a new top-level node and move an entire top-level tree inside it.
+    new_top = Category.create(:name => 'New Top')
+    categories(:top_level).move_to_child_of(new_top)
+    categories(:child_2_1).reload
+    Category.valid?.should be_true
+    new_top.id.should == categories(:top_level).parent_id
+
+    categories(:top_level).left.should == 4
+    categories(:top_level).right.should == 13
+    categories(:child_2_1).left.should == 8
+    categories(:child_2_1).right.should == 9
+  end
+
+  #rebuild swaps the position of the 2 children when added using move_to_child twice onto same parent
+  it "move_to_child_more_than_once_per_parent_rebuild" do
+    root1 = Category.create(:name => 'Root1')
+    root2 = Category.create(:name => 'Root2')
+    root3 = Category.create(:name => 'Root3')
+
+    root2.move_to_child_of root1
+    root3.move_to_child_of root1
+
+    output = Category.roots.last.to_text
+    Category.update_all('lft = null, rgt = null')
+    Category.rebuild!
+
+    Category.roots.last.to_text.should == output
+  end
+
+  # doing move_to_child twice onto same parent from the furthest right first
+  it "move_to_child_more_than_once_per_parent_outside_in" do
+    node1 = Category.create(:name => 'Node-1')
+    node2 = Category.create(:name => 'Node-2')
+    node3 = Category.create(:name => 'Node-3')
+
+    node2.move_to_child_of node1
+    node3.move_to_child_of node1
+
+    output = Category.roots.last.to_text
+    Category.update_all('lft = null, rgt = null')
+    Category.rebuild!
+
+    Category.roots.last.to_text.should == output
+  end
+
+  it "should be able to rebuild without validating each record" do
+    root1 = Category.create(:name => 'Root1')
+    root2 = Category.create(:name => 'Root2')
+    root3 = Category.create(:name => 'Root3')
+
+    root2.move_to_child_of root1
+    root3.move_to_child_of root1
+
+    root2.name = nil
+    root2.save!(:validate => false)
+
+    output = Category.roots.last.to_text
+    Category.update_all('lft = null, rgt = null')
+    Category.rebuild!(false)
+
+    Category.roots.last.to_text.should == output
+  end
+
+  it "valid_with_null_lefts" do
+    Category.valid?.should be_true
+    Category.update_all('lft = null')
+    Category.valid?.should be_false
+  end
+
+  it "valid_with_null_rights" do
+    Category.valid?.should be_true
+    Category.update_all('rgt = null')
+    Category.valid?.should be_false
+  end
+
+  it "valid_with_missing_intermediate_node" do
+    # Even though child_2_1 will still exist, it is a sign of a sloppy delete, not an invalid tree.
+    Category.valid?.should be_true
+    Category.delete(categories(:child_2).id)
+    Category.valid?.should be_true
+  end
+
+  it "valid_with_overlapping_and_rights" do
+    Category.valid?.should be_true
+    categories(:top_level_2)['lft'] = 0
+    categories(:top_level_2).save
+    Category.valid?.should be_false
+  end
+
+  it "rebuild" do
+    Category.valid?.should be_true
+    before_text = Category.root.to_text
+    Category.update_all('lft = null, rgt = null')
+    Category.rebuild!
+    Category.valid?.should be_true
+    before_text.should == Category.root.to_text
+  end
+
+  it "move_possible_for_sibling" do
+    categories(:child_2).move_possible?(categories(:child_1)).should be_true
+  end
+
+  it "move_not_possible_to_self" do
+    categories(:top_level).move_possible?(categories(:top_level)).should be_false
+  end
+
+  it "move_not_possible_to_parent" do
+    categories(:top_level).descendants.each do |descendant|
+      categories(:top_level).move_possible?(descendant).should be_false
+      descendant.move_possible?(categories(:top_level)).should be_true
+    end
+  end
+
+  it "is_or_is_ancestor_of?" do
+    [:child_1, :child_2, :child_2_1, :child_3].each do |c|
+      categories(:top_level).is_or_is_ancestor_of?(categories(c)).should be_true
+    end
+    categories(:top_level).is_or_is_ancestor_of?(categories(:top_level_2)).should be_false
+  end
+
+  it "left_and_rights_valid_with_blank_left" do
+    Category.left_and_rights_valid?.should be_true
+    categories(:child_2)[:lft] = nil
+    categories(:child_2).save(:validate => false)
+    Category.left_and_rights_valid?.should be_false
+  end
+
+  it "left_and_rights_valid_with_blank_right" do
+    Category.left_and_rights_valid?.should be_true
+    categories(:child_2)[:rgt] = nil
+    categories(:child_2).save(:validate => false)
+    Category.left_and_rights_valid?.should be_false
+  end
+
+  it "left_and_rights_valid_with_equal" do
+    Category.left_and_rights_valid?.should be_true
+    categories(:top_level_2)[:lft] = categories(:top_level_2)[:rgt]
+    categories(:top_level_2).save(:validate => false)
+    Category.left_and_rights_valid?.should be_false
+  end
+
+  it "left_and_rights_valid_with_left_equal_to_parent" do
+    Category.left_and_rights_valid?.should be_true
+    categories(:child_2)[:lft] = categories(:top_level)[:lft]
+    categories(:child_2).save(:validate => false)
+    Category.left_and_rights_valid?.should be_false
+  end
+
+  it "left_and_rights_valid_with_right_equal_to_parent" do
+    Category.left_and_rights_valid?.should be_true
+    categories(:child_2)[:rgt] = categories(:top_level)[:rgt]
+    categories(:child_2).save(:validate => false)
+    Category.left_and_rights_valid?.should be_false
+  end
+
+  it "moving_dirty_objects_doesnt_invalidate_tree" do
+    r1 = Category.create :name => "Test 1"
+    r2 = Category.create :name => "Test 2"
+    r3 = Category.create :name => "Test 3"
+    r4 = Category.create :name => "Test 4"
+    nodes = [r1, r2, r3, r4]
+
+    r2.move_to_child_of(r1)
+    Category.valid?.should be_true
+
+    r3.move_to_child_of(r1)
+    Category.valid?.should be_true
+
+    r4.move_to_child_of(r2)
+    Category.valid?.should be_true
+  end
+
+  it "multi_scoped_no_duplicates_for_columns?" do
+    lambda {
+      Note.no_duplicates_for_columns?
+    }.should_not raise_exception
+  end
+
+  it "multi_scoped_all_roots_valid?" do
+    lambda {
+      Note.all_roots_valid?
+    }.should_not raise_exception
+  end
+
+  it "multi_scoped" do
+    note1 = Note.create!(:body => "A", :notable_id => 2, :notable_type => 'Category')
+    note2 = Note.create!(:body => "B", :notable_id => 2, :notable_type => 'Category')
+    note3 = Note.create!(:body => "C", :notable_id => 2, :notable_type => 'Default')
+
+    [note1, note2].should == note1.self_and_siblings
+    [note3].should == note3.self_and_siblings
+  end
+
+  it "multi_scoped_rebuild" do
+    root = Note.create!(:body => "A", :notable_id => 3, :notable_type => 'Category')
+    child1 = Note.create!(:body => "B", :notable_id => 3, :notable_type => 'Category')
+    child2 = Note.create!(:body => "C", :notable_id => 3, :notable_type => 'Category')
+
+    child1.move_to_child_of root
+    child2.move_to_child_of root
+
+    Note.update_all('lft = null, rgt = null')
+    Note.rebuild!
+
+    Note.roots.find_by_body('A').should == root
+    [child1, child2].should == Note.roots.find_by_body('A').children
+  end
+
+  it "same_scope_with_multi_scopes" do
+    lambda {
+      notes(:scope1).same_scope?(notes(:child_1))
+    }.should_not raise_exception
+    notes(:scope1).same_scope?(notes(:child_1)).should be_true
+    notes(:child_1).same_scope?(notes(:scope1)).should be_true
+    notes(:scope1).same_scope?(notes(:scope2)).should be_false
+  end
+
+  it "quoting_of_multi_scope_column_names" do
+    ["\"notable_id\"", "\"notable_type\""].should == Note.quoted_scope_column_names
+  end
+
+  it "equal_in_same_scope" do
+    notes(:scope1).should == notes(:scope1)
+    notes(:scope1).should_not == notes(:child_1)
+  end
+
+  it "equal_in_different_scopes" do
+    notes(:scope1).should_not == notes(:scope2)
+  end
+
+  it "delete_does_not_invalidate" do
+    Category.acts_as_nested_set_options[:dependent] = :delete
+    categories(:child_2).destroy
+    Category.valid?.should be_true
+  end
+
+  it "destroy_does_not_invalidate" do
+    Category.acts_as_nested_set_options[:dependent] = :destroy
+    categories(:child_2).destroy
+    Category.valid?.should be_true
+  end
+
+  it "destroy_multiple_times_does_not_invalidate" do
+    Category.acts_as_nested_set_options[:dependent] = :destroy
+    categories(:child_2).destroy
+    categories(:child_2).destroy
+    Category.valid?.should be_true
+  end
+
+  it "assigning_parent_id_on_create" do
+    category = Category.create!(:name => "Child", :parent_id => categories(:child_2).id)
+    categories(:child_2).should == category.parent
+    categories(:child_2).id.should == category.parent_id
+    category.left.should_not be_nil
+    category.right.should_not be_nil
+    Category.valid?.should be_true
+  end
+
+  it "assigning_parent_on_create" do
+    category = Category.create!(:name => "Child", :parent => categories(:child_2))
+    categories(:child_2).should == category.parent
+    categories(:child_2).id.should == category.parent_id
+    category.left.should_not be_nil
+    category.right.should_not be_nil
+    Category.valid?.should be_true
+  end
+
+  it "assigning_parent_id_to_nil_on_create" do
+    category = Category.create!(:name => "New Root", :parent_id => nil)
+    category.parent.should be_nil
+    category.parent_id.should be_nil
+    category.left.should_not be_nil
+    category.right.should_not be_nil
+    Category.valid?.should be_true
+  end
+
+  it "assigning_parent_id_on_update" do
+    category = categories(:child_2_1)
+    category.parent_id = categories(:child_3).id
+    category.save
+    category.reload
+    categories(:child_3).reload
+    categories(:child_3).should == category.parent
+    categories(:child_3).id.should == category.parent_id
+    Category.valid?.should be_true
+  end
+
+  it "assigning_parent_on_update" do
+    category = categories(:child_2_1)
+    category.parent = categories(:child_3)
+    category.save
+    category.reload
+    categories(:child_3).reload
+    categories(:child_3).should == category.parent
+    categories(:child_3).id.should ==  category.parent_id
+    Category.valid?.should be_true
+  end
+
+  it "assigning_parent_id_to_nil_on_update" do
+    category = categories(:child_2_1)
+    category.parent_id = nil
+    category.save
+    category.parent.should be_nil
+    category.parent_id.should be_nil
+    Category.valid?.should be_true
+  end
+
+  it "creating_child_from_parent" do
+    category = categories(:child_2).children.create!(:name => "Child")
+    categories(:child_2).should == category.parent
+    categories(:child_2).id.should == category.parent_id
+    category.left.should_not be_nil
+    category.right.should_not be_nil
+    Category.valid?.should be_true
+  end
+
+  def check_structure(entries, structure)
+    structure = structure.dup
+    Category.each_with_level(entries) do |category, level|
+      expected_level, expected_name = structure.shift
+      expected_name.should == category.name
+      expected_level.should == level
+    end
+  end
+
+  it "each_with_level" do
+    levels = [
+      [0, "Top Level"],
+      [1, "Child 1"],
+      [1, "Child 2"],
+      [2, "Child 2.1"],
+      [1, "Child 3" ]]
+
+    check_structure(Category.root.self_and_descendants, levels)
+
+    # test some deeper structures
+    category = Category.find_by_name("Child 1")
+    c1 = Category.new(:name => "Child 1.1")
+    c2 = Category.new(:name => "Child 1.1.1")
+    c3 = Category.new(:name => "Child 1.1.1.1")
+    c4 = Category.new(:name => "Child 1.2")
+    [c1, c2, c3, c4].each(&:save!)
+
+    c1.move_to_child_of(category)
+    c2.move_to_child_of(c1)
+    c3.move_to_child_of(c2)
+    c4.move_to_child_of(category)
+
+    levels = [
+      [0, "Top Level"],
+      [1, "Child 1"],
+      [2, "Child 1.1"],
+      [3, "Child 1.1.1"],
+      [4, "Child 1.1.1.1"],
+      [2, "Child 1.2"],
+      [1, "Child 2"],
+      [2, "Child 2.1"],
+      [1, "Child 3" ]]
+
+      check_structure(Category.root.self_and_descendants, levels)
+  end
+
+  it "should not error on a model with attr_accessible" do
+    model = Class.new(ActiveRecord::Base)
+    model.table_name = 'categories'
+    model.attr_accessible :name
+    lambda {
+      model.acts_as_nested_set
+      model.new(:name => 'foo')
+    }.should_not raise_exception
+  end
+
+  describe "before_move_callback" do
+    it "should fire the callback" do
+      categories(:child_2).should_receive(:custom_before_move)
+      categories(:child_2).move_to_root
+    end
+
+    it "should stop move when callback returns false" do
+      Category.test_allows_move = false
+      categories(:child_3).move_to_root.should be_false
+      categories(:child_3).root?.should be_false
+    end
+
+    it "should not halt save actions" do
+      Category.test_allows_move = false
+      categories(:child_3).parent_id = nil
+      categories(:child_3).save.should be_true
+    end
+  end
+
+  describe "counter_cache" do
+
+    it "should allow use of a counter cache for children" do
+      note1 = things(:parent1)
+      note1.children.count.should == 2
+    end
+
+    it "should increment the counter cache on create" do
+      note1 = things(:parent1)
+      note1.children.count.should == 2
+      note1[:children_count].should == 2
+      note1.children.create :body => 'Child 3'
+      note1.children.count.should == 3
+      note1.reload
+      note1[:children_count].should == 3
+    end
+
+    it "should decrement the counter cache on destroy" do
+      note1 = things(:parent1)
+      note1.children.count.should == 2
+      note1[:children_count].should == 2
+      note1.children.last.destroy
+      note1.children.count.should == 1
+      note1.reload
+      note1[:children_count].should == 1
+    end
+  end
+
+  describe "association callbacks on children" do
+    it "should call the appropriate callbacks on the children :has_many association " do
+      root = DefaultWithCallbacks.create
+      root.should_not be_new_record
+
+      child = root.children.build
+
+      root.before_add.should == child
+      root.after_add.should  == child
+
+      root.before_remove.should_not == child
+      root.after_remove.should_not  == child
+
+      child.save.should be_true
+      root.children.delete(child).should be_true
+
+      root.before_remove.should == child
+      root.after_remove.should  == child
+    end
+  end
+end