mongoid 6.4.4 → 7.1.7

data/spec/mongoid/{relations → association}/auto_save_spec.rb

@@ -1,11 +1,15 @@
+# frozen_string_literal: true
+# encoding: utf-8
+
 require "spec_helper"
 
-describe Mongoid::Relations::AutoSave do
+describe Mongoid::Association::Referenced::AutoSave do
 
   describe ".auto_save" do
 
     before(:all) do
-      Person.autosave(Person.relations["account"].merge!(autosave: true))
+      Person.has_many :drugs, validate: false, autosave: true
+      Person.has_one :account, validate: false, autosave: true
     end
 
     after(:all) do
@@ -42,13 +46,8 @@ describe Mongoid::Relations::AutoSave do
 
       context "when the relation has already had the autosave callback added" do
 
-        let(:metadata) do
-          Person.relations["drugs"].merge!(autosave: true)
-        end
-
         before do
-          Person.autosave(metadata)
-          Person.autosave(metadata)
+          Person.has_many :drugs, validate: false, autosave: true
         end
 
         let(:drug) do
@@ -71,6 +70,11 @@ describe Mongoid::Relations::AutoSave do
         context "when saving a new parent document" do
 
           context 'when persistence options are not set on the parent' do
+
+            before do
+              Person.has_many :drugs, validate: false, autosave: true
+            end
+
             before do
               person.drugs << drug
               person.save
@@ -254,10 +258,6 @@ describe Mongoid::Relations::AutoSave do
 
       context "when it has two relations with autosaves" do
 
-        before do
-          Person.autosave(Person.relations["drugs"].merge!(autosave: true))
-        end
-
         let!(:person) do
           Person.create(drugs: [percocet], account: account)
         end
@@ -309,6 +309,57 @@ describe Mongoid::Relations::AutoSave do
           end
         end
       end
+
+      context 'when the autosave should be cascaded' do
+
+        before do
+          class King
+            include Mongoid::Document
+            has_one :peasant, autosave: true
+          end
+
+          class Peasant
+            include Mongoid::Document
+            belongs_to :king
+            has_one :harvest, autosave: true
+          end
+
+          class Harvest
+            include Mongoid::Document
+            field :season, type: String
+            belongs_to :peasant
+          end
+        end
+
+        after do
+          Object.send(:remove_const, :King)
+          Object.send(:remove_const, :Peasant)
+          Object.send(:remove_const, :Harvest)
+        end
+
+        let(:king) do
+          King.create
+        end
+
+        let(:peasant) do
+          Peasant.create
+        end
+
+        let(:harvest) do
+          Harvest.create(season: 'Summer')
+        end
+
+        before do
+          peasant.harvest = harvest
+          king.peasant = peasant
+          harvest.season = 'Fall'
+          king.save
+        end
+
+        it 'cascades the save' do
+          expect(harvest.reload.season).to eq('Fall')
+        end
+      end
     end
   end
 end

data/spec/mongoid/{relations → association}/builders_spec.rb

@@ -1,6 +1,9 @@
+# frozen_string_literal: true
+# encoding: utf-8
+
 require "spec_helper"
 
-describe Mongoid::Relations::Builders do
+describe Mongoid::Association::Builders do
 
   describe "#build_#\{name}" do
 

data/spec/mongoid/association/constrainable_spec.rb

@@ -0,0 +1,118 @@
+# frozen_string_literal: true
+# encoding: utf-8
+
+require "spec_helper"
+
+describe Mongoid::Association::Constrainable do
+
+  describe "#convert_to_foreign_key" do
+
+    context "when the id's class stores object ids" do
+
+      before(:all) do
+        Person.field(
+          :_id,
+          type: BSON::ObjectId,
+          pre_processed: true,
+          default: ->{ BSON::ObjectId.new },
+          overwrite: true
+        )
+      end
+
+      let(:constrainable) do
+        Post.belongs_to :person
+      end
+
+      context "when provided an object id" do
+
+        let(:object) do
+          BSON::ObjectId.new
+        end
+
+        it "returns the object id" do
+          expect(constrainable.convert_to_foreign_key(object)).to eq(object)
+        end
+      end
+
+      context "when provided a string" do
+
+        let(:object) do
+          BSON::ObjectId.new
+        end
+
+        it "returns an object id from the string" do
+          expect(constrainable.convert_to_foreign_key(object.to_s)).to eq(object)
+        end
+      end
+    end
+
+    context "when the id's class does not store object ids" do
+
+      let(:constrainable) do
+        Alert.belongs_to :account
+      end
+
+      it "returns the object" do
+        expect(constrainable.convert_to_foreign_key("testing")).to eq("testing")
+      end
+    end
+
+    context 'when the association is polymorphic' do
+
+      let(:constrainable) do
+        Post.relations['posteable']
+      end
+
+      let(:result) do
+        constrainable.convert_to_foreign_key(object)
+      end
+
+      context 'when a BSON::ObjectId is passed' do
+
+        let(:object) do
+          BSON::ObjectId.new
+        end
+
+        it 'returns the object id' do
+          expect(result).to eq(object)
+        end
+      end
+
+      context 'when a string is passed' do
+
+        context 'when the string represents an ObjectId' do
+
+          let(:object) do
+            BSON::ObjectId.new.to_s
+          end
+
+          it 'returns the object id' do
+            expect(result).to eq(BSON::ObjectId.from_string(object))
+          end
+        end
+
+        context 'when the string does not represent an ObjectId' do
+
+          let(:object) do
+            'some-other-string'
+          end
+
+          it 'returns the object' do
+            expect(result).to eq(object)
+          end
+        end
+      end
+
+      context 'when a model object is passed' do
+
+        let(:object) do
+          Post.new
+        end
+
+        it 'returns the id' do
+          expect(result).to eq(object.id)
+        end
+      end
+    end
+  end
+end

data/spec/mongoid/{relations → association}/counter_cache_spec.rb

@@ -1,6 +1,9 @@
+# frozen_string_literal: true
+# encoding: utf-8
+
 require "spec_helper"
 
-describe Mongoid::Relations::CounterCache do
+describe Mongoid::Association::Referenced::CounterCache do
 
   describe "#reset_counters" do
 

data/spec/mongoid/association/depending_spec.rb

@@ -0,0 +1,869 @@
+# frozen_string_literal: true
+# encoding: utf-8
+
+require "spec_helper"
+
+describe Mongoid::Association::Depending do
+
+  describe '#self.included' do
+
+    context 'when a destroy dependent is defined' do
+
+      context 'when the model is a subclass' do
+
+        context 'when transitive dependents are defined' do
+
+          let(:define_classes) do
+            class DependentReportCard
+              include Mongoid::Document
+
+              belongs_to :dependent_student
+            end
+
+            class DependentUser
+              include Mongoid::Document
+            end
+
+            class DependentStudent < DependentUser
+              belongs_to :dependent_teacher
+              has_many :dependent_report_cards, dependent: :destroy
+            end
+
+            class DependentDerivedStudent < DependentStudent; end
+
+            class DependentTeacher
+              include Mongoid::Document
+
+              has_many :dependent_students, dependent: :destroy
+            end
+
+            class DependentCollegeUser < DependentUser; end
+          end
+
+          it "does not add the dependent to superclass" do
+            define_classes
+
+            expect(DependentUser.dependents).to be_empty
+
+            u = DependentUser.create!
+            expect(u.dependents).to be_empty
+          end
+
+          it 'does not impede destroying the superclass' do
+            define_classes
+
+            u = DependentUser.create!
+            expect { u.destroy! }.not_to raise_error
+          end
+
+          it 'adds the dependent' do
+            define_classes
+
+            expect(DependentStudent.dependents.length).to be(1)
+            expect(DependentStudent.dependents.first.name).to be(:dependent_report_cards)
+
+            s = DependentStudent.create!
+            expect(s.dependents.length).to be(1)
+            expect(s.dependents.first.name).to be(:dependent_report_cards)
+          end
+
+          it 'facilitates proper destroying of the object' do
+            define_classes
+
+            s = DependentStudent.create!
+            r = DependentReportCard.create!(dependent_student: s)
+            s.destroy!
+
+            expect { DependentReportCard.find(r.id) }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+
+          it 'facilitates proper transitive destroying of the object' do
+            define_classes
+
+            t = DependentTeacher.create!
+            s = DependentStudent.create!(dependent_teacher: t)
+            r = DependentReportCard.create!(dependent_student: s)
+            s.destroy!
+
+            expect { DependentReportCard.find(r.id) }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+
+          it 'adds the dependent to subclasses' do
+            define_classes
+
+            expect(DependentDerivedStudent.dependents.length).to be(1)
+            expect(DependentDerivedStudent.dependents.first.name).to be(:dependent_report_cards)
+
+            s = DependentDerivedStudent.create!
+            expect(s.dependents.length).to be(1)
+            expect(s.dependents.first.name).to be(:dependent_report_cards)
+          end
+
+          it 'facilitates proper destroying of the object from subclasses' do
+            define_classes
+
+            s = DependentDerivedStudent.create!
+            r = DependentReportCard.create!(dependent_student: s)
+            s.destroy!
+
+            expect { DependentReportCard.find(r.id) }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+
+          it "doesn't add the dependent to sibling classes" do
+            define_classes
+
+            expect(DependentCollegeUser.dependents).to be_empty
+
+            c = DependentCollegeUser.create!
+            expect(c.dependents).to be_empty
+          end
+
+          it 'does not impede destroying the sibling class' do
+            define_classes
+
+            c = DependentCollegeUser.create!
+            expect { c.destroy! }.not_to raise_error
+          end
+        end
+
+        context 'when a superclass is reopened and a new dependent is added' do
+          let(:define_classes) do
+            class DependentOwnedOne
+              include Mongoid::Document
+
+              belongs_to :dependent_superclass
+            end
+
+            class DependentOwnedTwo
+              include Mongoid::Document
+
+              belongs_to :dependent_superclass
+            end
+
+            class DependentSuperclass
+              include Mongoid::Document
+              has_one :dependent_owned_one
+              has_one :dependent_owned_two
+            end
+
+            class DependentSubclass < DependentSuperclass
+              has_one :dependent_owned_two, dependent: :nullify
+            end
+
+            class DependentSuperclass
+              has_one :dependent_owned_one, dependent: :destroy
+            end
+          end
+
+          it 'defines the dependent from the reopened superclass on the subclass' do
+            define_classes
+
+            DependentSubclass.create!.destroy!
+
+            expect(DependentSubclass.dependents.length).to be(1)
+            expect(DependentSubclass.dependents.last.name).to be(:dependent_owned_two)
+            expect(DependentSubclass.dependents.last.options[:dependent]).to be(:nullify)
+
+            subclass = DependentSubclass.create!
+            expect(subclass.dependents.last.name).to be(:dependent_owned_two)
+            expect(subclass.dependents.last.options[:dependent]).to be(:nullify)
+          end
+
+          it 'causes the destruction of the inherited destroy dependent' do
+            define_classes
+
+            subclass = DependentSubclass.create!
+            owned = DependentOwnedOne.create!(dependent_superclass: subclass)
+            subclass.destroy!
+
+            expect {
+              DependentOwnedOne.find(owned.id)
+            }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+        end
+
+        context 'when a separate subclass overrides the destroy dependent' do
+          let(:define_classes) do
+            class Dep
+              include Mongoid::Document
+
+              belongs_to :double_assoc
+            end
+
+            class DoubleAssoc
+              include Mongoid::Document
+
+              has_many :deps, dependent: :destroy
+            end
+
+            class DoubleAssocOne < DoubleAssoc
+              has_many :deps, dependent: :nullify, inverse_of: :double_assoc
+            end
+
+            class DoubleAssocTwo < DoubleAssocOne
+              has_many :deps, dependent: :destroy, inverse_of: :double_assoc
+            end
+
+            class DoubleAssocThree < DoubleAssoc; end
+          end
+
+          it 'adds the non-destroy dependent correctly to the subclass with the override' do
+            define_classes
+
+            expect(DoubleAssocOne.dependents.length).to be(1)
+            expect(DoubleAssocOne.dependents.first.name).to be(:deps)
+            expect(DoubleAssocOne.dependents.first.options[:dependent]).to be(:nullify)
+
+            one = DoubleAssocOne.create!
+            expect(one.dependents.length).to be(1)
+            expect(one.dependents.first.name).to be(:deps)
+            expect(one.dependents.first.options[:dependent]).to be(:nullify)
+          end
+
+          it 'does not cause the destruction of the non-destroy dependent' do
+            define_classes
+
+            one = DoubleAssocOne.create!
+            dep = Dep.create!(double_assoc: one)
+            one.destroy!
+
+            expect { Dep.find(dep.id) }.not_to raise_error
+            expect(dep.double_assoc).to be_nil
+          end
+
+          it 'adds the destroy dependent correctly to the subclass without the override' do
+            define_classes
+
+            expect(DoubleAssocTwo.dependents.length).to be(1)
+            expect(DoubleAssocTwo.dependents.first.name).to be(:deps)
+            expect(DoubleAssocTwo.dependents.first.options[:dependent]).to be(:destroy)
+
+            two = DoubleAssocTwo.create!
+            expect(two.dependents.length).to be(1)
+            expect(two.dependents.first.name).to be(:deps)
+            expect(two.dependents.first.options[:dependent]).to be(:destroy)
+          end
+
+          it 'causes the destruction of the destroy dependent' do
+            define_classes
+
+            two = DoubleAssocTwo.create!
+            dep = Dep.create!(double_assoc: two)
+            two.destroy!
+
+            expect { Dep.find(dep.id) }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+        end
+      end
+    end
+  end
+
+  around(:each) do |example|
+    relations_before = Person.relations
+    example.run
+    Person.relations = relations_before
+  end
+
+  describe "#apply_delete_dependencies!" do
+
+    let(:band) do
+      Band.new
+    end
+
+    context "when the association exists in the list of dependencies" do
+
+      context "when the association has no dependent strategy" do
+
+        before do
+          band.dependents.push(Band.relations["records"])
+        end
+
+        after do
+          band.dependents.delete(Band.relations["records"])
+        end
+
+        it "ignores the dependency" do
+          expect(band.apply_delete_dependencies!).to eq([Band.relations["records"]])
+        end
+      end
+    end
+  end
+
+  describe ".define_dependency!" do
+
+    let(:klass) do
+      Class.new.tap { |c| c.send(:include, Mongoid::Document) }
+    end
+
+    context "when the association metadata doesnt exist" do
+
+      before do
+        klass.dependents.push("nothing")
+      end
+
+      it "does not raise an error" do
+        expect {
+          klass.new.apply_delete_dependencies!
+        }.not_to raise_error
+      end
+    end
+
+    context "when a dependent option is provided" do
+
+      let!(:association) do
+        klass.has_many :posts, dependent: :destroy
+      end
+
+      after do
+        klass.relations.delete(association.name.to_s)
+      end
+
+      it "adds the relation to the dependents" do
+        expect(klass.dependents).to include(klass.relations["posts"])
+      end
+    end
+
+    context "when no dependent option is provided" do
+
+      let!(:association) do
+        klass.has_many :posts
+      end
+
+      after do
+        klass.relations.delete(association.name.to_s)
+      end
+
+      it "does not add a relation to the dependents" do
+        expect(klass.dependents).to_not include(association)
+      end
+    end
+
+    context 'when the class is defined more than once' do
+
+      let!(:association) do
+        klass.has_many :posts, dependent: :destroy
+        klass.has_many :posts, dependent: :destroy
+      end
+
+      it 'only creates the dependency once' do
+        expect(klass.dependents.size).to eq(1)
+      end
+    end
+  end
+
+  [:delete, :destroy].each do |method|
+
+    describe "##{method}" do
+
+      context "when cascading removals" do
+
+        context "when strategy is delete" do
+
+          let(:person) do
+            Person.create
+          end
+
+          let!(:post) do
+            person.posts.create(title: "Testing")
+          end
+
+          before do
+            person.send(method)
+          end
+
+          it "deletes the associated documents" do
+            expect {
+              Post.find(post.id)
+            }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+        end
+
+        context "when strategy is destroy" do
+
+          let(:person) do
+            Person.create
+          end
+
+          let!(:game) do
+            person.create_game(name: "Pong")
+          end
+
+          before do
+            person.send(method)
+          end
+
+          it "destroys the associated documents" do
+            expect {
+              Game.find(game.id)
+            }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+        end
+
+        context "when strategy is nullify" do
+
+          context "when nullifying a references many" do
+
+            let(:movie) do
+              Movie.create(title: "Bladerunner")
+            end
+
+            let!(:rating) do
+              movie.ratings.create(value: 10)
+            end
+
+            let(:from_db) do
+              Rating.find(rating.id)
+            end
+
+            before do
+              movie.send(method)
+            end
+
+            it "removes the references to the removed document" do
+              expect(from_db.ratable_id).to be_nil
+            end
+          end
+
+          context "when nullifying a references one" do
+
+            context "when the relation exists" do
+
+              let(:book) do
+                Book.create(title: "Neuromancer")
+              end
+
+              let!(:rating) do
+                book.create_rating(value: 10)
+              end
+
+              let(:from_db) do
+                Rating.find(rating.id)
+              end
+
+              before do
+                book.send(method)
+              end
+
+              it "removes the references to the removed document" do
+                expect(from_db.ratable_id).to be_nil
+              end
+            end
+
+            context "when the relation is nil" do
+
+              let(:book) do
+                Book.create(title: "Neuromancer")
+              end
+
+              it "returns nil" do
+                expect(book.send(method)).to be true
+              end
+            end
+          end
+
+          context "when nullifying a many to many" do
+
+            let(:person) do
+              Person.create
+            end
+
+            let!(:preference) do
+              person.preferences.create(name: "Setting")
+            end
+
+            let(:from_db) do
+              Preference.find(preference.id)
+            end
+
+            before do
+              person.send(method)
+            end
+
+            it "removes the references from the removed document" do
+              expect(person.preference_ids).to_not include(preference.id)
+            end
+
+            it "removes the references to the removed document" do
+              expect(from_db.person_ids).to_not include(person.id)
+            end
+          end
+        end
+
+        context "when dependent is restrict_with_error" do
+
+          context "when restricting a references many" do
+
+            let!(:association) do
+              Person.has_many :drugs, dependent: :restrict_with_exception
+            end
+
+            after do
+              Person.dependents.delete(association)
+              Person.has_many :drugs, validate: false
+            end
+
+            context "when the relation is empty" do
+
+              let(:person) do
+                Person.new drugs: []
+              end
+
+              it "raises no error" do
+                expect { person.send(method) }.to_not raise_error
+              end
+
+              it "deletes the parent" do
+                person.send(method)
+                expect(person).to be_destroyed
+              end
+            end
+
+            context "when the relation is not empty" do
+
+              let(:person) do
+                Person.new drugs: [Drug.new]
+              end
+
+              it "raises DeleteRestriction error" do
+                expect { person.send(method) }.to raise_error(Mongoid::Errors::DeleteRestriction)
+              end
+            end
+          end
+
+          context "when restricting a references one" do
+
+            let!(:association) do
+              Person.has_one :account, dependent: :restrict_with_exception
+            end
+
+            after do
+              Person.dependents.delete(association)
+              Person.has_one :account, validate: false
+            end
+
+            context "when the relation is empty" do
+
+              let(:person) do
+                Person.new account: nil
+              end
+
+              it "raises no error" do
+                expect { person.send(method) }.to_not raise_error
+              end
+
+              it "deletes the parent" do
+                person.send(method)
+                expect(person).to be_destroyed
+              end
+            end
+
+            context "when the relation is not empty" do
+
+              let(:person) do
+                Person.new account: Account.new(name: 'test')
+              end
+
+              it "raises DeleteRestriction error" do
+                expect { person.send(method) }.to raise_error(Mongoid::Errors::DeleteRestriction)
+              end
+            end
+          end
+
+          context "when restricting a many to many" do
+
+            let!(:association) do
+              Person.has_and_belongs_to_many :houses, dependent: :restrict_with_exception
+            end
+
+            after do
+              Person.dependents.delete(association)
+              Person.has_and_belongs_to_many :houses, validate: false
+            end
+
+            context "when the relation is empty" do
+
+              let(:person) do
+                Person.new houses: []
+              end
+
+              it "raises no error" do
+                expect { person.send(method) }.to_not raise_error
+              end
+
+              it "deletes the parent" do
+                person.send(method)
+                expect(person).to be_destroyed
+              end
+            end
+
+            context "when the relation is not empty" do
+
+              let(:person) do
+                Person.new houses: [House.new]
+              end
+
+              it "raises DeleteRestriction error" do
+                expect { person.send(method) }.to raise_error(Mongoid::Errors::DeleteRestriction)
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+
+  context 'when the strategy is :delete_all' do
+
+    let(:person) do
+      Person.create
+    end
+
+    context "when cascading a has one" do
+
+      context "when the relation exists" do
+
+        let!(:home) do
+          person.create_home
+        end
+
+        before do
+          person.delete
+        end
+
+        it "deletes the relation" do
+          expect(home).to be_destroyed
+        end
+
+        it "persists the deletion" do
+          expect {
+            home.reload
+          }.to raise_error(Mongoid::Errors::DocumentNotFound)
+        end
+      end
+
+      context "when the relation does not exist" do
+
+        before do
+          person.delete
+        end
+
+        it "deletes the base document" do
+          expect(person).to be_destroyed
+        end
+      end
+    end
+
+    context "when cascading a has many" do
+
+      context "when the relation has documents" do
+
+        let!(:post_one) do
+          person.posts.create(title: "one")
+        end
+
+        let!(:post_two) do
+          person.posts.create(title: "two")
+        end
+
+        context "when the documents are in memory" do
+
+          before do
+            expect(post_one).to receive(:delete).never
+            expect(post_two).to receive(:delete).never
+            person.delete
+          end
+
+          it "deletes the first document" do
+            expect(post_one).to be_destroyed
+          end
+
+          it "deletes the second document" do
+            expect(post_two).to be_destroyed
+          end
+
+          it "unbinds the first document" do
+            expect(post_one.person).to be_nil
+          end
+
+          it "unbinds the second document" do
+            expect(post_two.person).to be_nil
+          end
+
+          it "removes the documents from the relation" do
+            expect(person.posts).to be_empty
+          end
+
+          it "persists the first deletion" do
+            expect {
+              post_one.reload
+            }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+
+          it "persists the second deletion" do
+            expect {
+              post_two.reload
+            }.to raise_error(Mongoid::Errors::DocumentNotFound)
+          end
+        end
+      end
+    end
+  end
+
+  context 'when the strategy is :destroy' do
+
+    let!(:association) do
+      Person.has_many :destroyable_posts, class_name: "Post", dependent: :destroy
+    end
+
+    after do
+      Person.dependents.delete(association)
+    end
+
+    let(:person) do
+      Person.new
+    end
+
+    let(:post) do
+      Post.new
+    end
+
+    context "when the documents exist" do
+
+      before do
+        expect(post).to receive(:destroy)
+        person.destroyable_posts << post
+      end
+
+      it "destroys all documents in the relation" do
+        person.delete
+      end
+    end
+
+    context "when no documents exist" do
+
+      before do
+        expect(post).to receive(:destroy).never
+      end
+
+      it "it does not destroy the relation" do
+        person.delete
+      end
+    end
+  end
+
+  context 'when the strategy is :nullify' do
+
+    let!(:association) do
+      Person.has_many :nullifyable_posts, class_name: "Post", dependent: :nullify
+    end
+
+    after do
+      Person.dependents.delete(association)
+    end
+
+    let(:person) do
+      Person.new
+    end
+
+    let(:posts_relation) do
+      person.posts
+    end
+
+    before do
+      allow(person).to receive(:nullifyable_posts).and_return(posts_relation)
+      expect(posts_relation).to receive(:nullify)
+    end
+
+    it "nullifies the relation" do
+      person.delete
+    end
+  end
+
+  context 'when the strategy is :restrict_with_exception' do
+
+    let(:person) do
+      Person.new
+    end
+
+    let(:post) do
+      Post.new
+    end
+
+    let!(:association) do
+      Person.has_many :restrictable_posts, class_name: "Post", dependent: :restrict_with_exception
+    end
+
+    after do
+      Person.dependents.delete(association)
+    end
+
+    context 'when there are related objects' do
+
+      before do
+        person.restrictable_posts << post
+        expect(post).to receive(:delete).never
+        expect(post).to receive(:destroy).never
+      end
+
+      it 'raises an exception and leaves the related one intact' do
+        expect { person.delete }.to raise_exception(Mongoid::Errors::DeleteRestriction)
+      end
+    end
+
+    context 'when there are no related objects' do
+
+      before do
+        expect(post).to receive(:delete).never
+        expect(post).to receive(:destroy).never
+      end
+
+      it 'deletes the object and leaves the other one intact' do
+        expect(person.delete).to be(true)
+      end
+    end
+  end
+
+  context 'when the strategy is :restrict_with_error' do
+
+    let(:person) do
+      Person.new
+    end
+
+    let(:post) do
+      Post.new
+    end
+
+    let!(:association) do
+      Person.has_many :restrictable_posts, class_name: "Post", dependent: :restrict_with_error
+    end
+
+    after do
+      Person.dependents.delete(association)
+    end
+
+    context 'when there are related objects' do
+
+      before do
+        person.restrictable_posts << post
+      end
+
+      it 'adds an error to the parent object' do
+        expect(person.delete).to be(false)
+        expect(person.errors[:restrictable_posts].first).to be(
+          Mongoid::Association::Depending::RESTRICT_ERROR_MSG)
+      end
+    end
+
+    context 'when there are no related objects' do
+
+      before do
+        expect(post).to receive(:delete).never
+        expect(post).to receive(:destroy).never
+      end
+
+      it 'deletes the object and leaves the other one intact' do
+        expect(person.delete).to be(true)
+      end
+    end
+  end
+end