hydra-works 0.0.1 → 0.1.0

data/spec/hydra/works/services/collection/get_collections_spec.rb

@@ -1,35 +0,0 @@
-require 'spec_helper'
-
-describe Hydra::Works::GetCollectionsFromCollection do
-
-  subject { Hydra::Works::Collection.create }
-
-  let(:collection1) { Hydra::Works::Collection.create }
-  let(:collection2) { Hydra::Works::Collection.create }
-
-  let(:generic_work1) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work2) { Hydra::Works::GenericWork::Base.create }
-
-  describe '#call' do
-    it 'should return empty array when only generic_works are aggregated' do
-      Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-      Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work2 )
-      subject.save
-      expect(Hydra::Works::GetCollectionsFromCollection.call( subject )).to eq []
-    end
-
-    context 'with other collections & generic_works' do
-      before do
-        Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work2 )
-        subject.save
-      end
-
-      it 'should only return collections' do
-        expect(Hydra::Works::GetCollectionsFromCollection.call( subject )).to eq [collection1,collection2]
-      end
-   end
-  end
-end

data/spec/hydra/works/services/collection/get_generic_works_spec.rb

@@ -1,35 +0,0 @@
-require 'spec_helper'
-
-describe Hydra::Works::GetGenericWorksFromCollection do
-
-  subject { Hydra::Works::Collection.create }
-
-  let(:collection1) { Hydra::Works::Collection.create }
-  let(:collection2) { Hydra::Works::Collection.create }
-
-  let(:generic_work1) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work2) { Hydra::Works::GenericWork::Base.create }
-
-  describe '#call' do
-    it 'should return empty array when only collections are aggregated' do
-      Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-      Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-      subject.save
-      expect(Hydra::Works::GetGenericWorksFromCollection.call( subject )).to eq []
-    end
-
-    context 'with collections and generic works' do
-      before do
-        Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work2 )
-        subject.save
-      end
-
-      it 'should only return generic works' do
-        expect(Hydra::Works::GetGenericWorksFromCollection.call( subject )).to eq [generic_work1,generic_work2]
-      end
-   end
-  end
-end

data/spec/hydra/works/services/collection/get_related_objects_spec.rb

@@ -1,49 +0,0 @@
-require 'spec_helper'
-
-describe Hydra::Works::GetRelatedObjectsFromCollection do
-
-  subject { Hydra::Works::Collection.create }
-
-  let(:collection1) { Hydra::Works::Collection.create }
-  let(:collection2) { Hydra::Works::Collection.create }
-
-  let(:object1) { Hydra::PCDM::Object.create }
-  let(:object2) { Hydra::PCDM::Object.create }
-
-  let(:generic_work1) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work2) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_file1) { Hydra::Works::GenericFile::Base.create }
-
-  describe '#call' do
-    context 'with collections and generic works' do
-      before do
-        Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-        subject.save
-      end
-
-      it 'should return empty array when only collections and generic works are aggregated' do
-        expect(Hydra::Works::GetRelatedObjectsFromCollection.call( subject )).to eq []
-      end
-
-      it 'should only return related objects' do
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, object2 )
-        expect(Hydra::Works::GetRelatedObjectsFromCollection.call( subject )).to eq [object2]
-      end
-
-      it 'should return related objects of various types' do
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, generic_work2 )
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, generic_file1 )
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, object1 )
-        related_objects = Hydra::Works::GetRelatedObjectsFromCollection.call( subject )
-        expect( related_objects.include? object1 ).to be true
-        expect( related_objects.include? generic_work2 ).to be true
-        expect( related_objects.include? generic_file1 ).to be true
-        expect( related_objects.size ).to eq 3
-      end
-   end
-  end
-end
-
-

data/spec/hydra/works/services/collection/remove_collection_spec.rb

@@ -1,133 +0,0 @@
-require 'spec_helper'
-
-describe Hydra::Works::RemoveCollectionFromCollection do
-
-  subject { Hydra::Works::Collection.create }
-
-    let(:collection1) { Hydra::Works::Collection.create }
-    let(:collection2) { Hydra::Works::Collection.create }
-    let(:collection3) { Hydra::Works::Collection.create }
-    let(:collection4) { Hydra::Works::Collection.create }
-    let(:collection5) { Hydra::Works::Collection.create }
-
-    let(:generic_work1) { Hydra::Works::GenericWork::Base.create }
-    let(:generic_work2) { Hydra::Works::GenericWork::Base.create }
-
-
-  describe '#call' do
-    context 'when multiple collections' do
-      before do
-        Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work2 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection3 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection4 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection5 )
-        subject.save
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection1,collection2,collection3,collection4,collection5]
-      end
-
-      it 'should remove first collection' do
-        expect( Hydra::Works::RemoveCollectionFromCollection.call( subject, collection1 ) ).to eq collection1
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection3,collection4,collection5]
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work2,generic_work1]
-      end
-
-      it 'should remove last collection' do
-        expect( Hydra::Works::RemoveCollectionFromCollection.call( subject, collection5 ) ).to eq collection5
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection1,collection2,collection3,collection4]
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work2,generic_work1]
-      end
-
-      it 'should remove middle collection' do
-        expect( Hydra::Works::RemoveCollectionFromCollection.call( subject, collection3 ) ).to eq collection3
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection1,collection2,collection4,collection5]
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work2,generic_work1]
-      end
-    end
-  end
-
-  context 'with unacceptable collections' do
-    let(:generic_work1)    { Hydra::Works::GenericWork::Base.create }
-    let(:generic_file1)    { Hydra::Works::GenericFile::Base.create }
-    let(:pcdm_collection1) { Hydra::PCDM::Collection.create }
-    let(:pcdm_object1)     { Hydra::PCDM::Object.create }
-    let(:pcdm_file1)       { Hydra::PCDM::File.new }
-    let(:non_PCDM_object)  { "I'm not a PCDM object" }
-    let(:af_base_object)   { ActiveFedora::Base.create }
-
-    let(:error_type)    { ArgumentError }
-    let(:error_message) { 'child_collection must be a hydra-works collection' }
-
-    it 'should NOT remove Hydra::Works::GenericWork from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, generic_work1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::Works::GenericFile from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, generic_file1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Collections from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, pcdm_collection1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Objects from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, pcdm_object1 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Files from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, pcdm_file1 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove non-PCDM objects from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, non_PCDM_object ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove AF::Base objects from collections aggregation' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( subject, af_base_object ) }.to raise_error(error_type,error_message)
-    end
-  end
-
-  context 'with unacceptable parent collection' do
-    let(:collection2)      { Hydra::Works::Collection.create }
-    let(:generic_work1)    { Hydra::Works::GenericWork::Base.create }
-    let(:generic_file1)    { Hydra::Works::GenericFile::Base.create }
-    let(:pcdm_collection1) { Hydra::PCDM::Collection.create }
-    let(:pcdm_object1)     { Hydra::PCDM::Object.create }
-    let(:pcdm_file1)       { Hydra::PCDM::File.new }
-    let(:non_PCDM_object)  { "I'm not a PCDM object" }
-    let(:af_base_object)   { ActiveFedora::Base.create }
-
-    let(:error_type)    { ArgumentError }
-    let(:error_message) { 'parent_collection must be a hydra-works collection' }
-
-    it 'should NOT accept Hydra::Works::GenericWork as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( generic_work1, collection2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::Works::GenericFile as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( generic_file1, collection2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Collections as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( pcdm_collection1, collection2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Objects as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( pcdm_object1, collection2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Files as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( pcdm_file1, collection2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept non-PCDM objects as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( non_PCDM_object, collection2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept AF::Base objects as parent collection' do
-      expect{ Hydra::Works::RemoveCollectionFromCollection.call( af_base_object, collection2 ) }.to raise_error(error_type,error_message)
-    end
-  end
-end

data/spec/hydra/works/services/collection/remove_generic_work_spec.rb

@@ -1,133 +0,0 @@
-require 'spec_helper'
-
-describe Hydra::Works::RemoveGenericWorkFromCollection do
-
-  subject { Hydra::Works::Collection.create }
-
-  let(:generic_work1) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work2) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work3) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work4) { Hydra::Works::GenericWork::Base.create }
-  let(:generic_work5) { Hydra::Works::GenericWork::Base.create }
-
-  let(:collection1) { Hydra::Works::Collection.create }
-  let(:collection2) { Hydra::Works::Collection.create }
-
-
-  describe '#call' do
-    context 'when multiple generic works' do
-      before do
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work2 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work3 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work4 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work5 )
-        subject.save
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work1,generic_work2,generic_work3,generic_work4,generic_work5]
-      end
-
-      it 'should remove first generic work' do
-        expect( Hydra::Works::RemoveGenericWorkFromCollection.call( subject, generic_work1 ) ).to eq generic_work1
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work2,generic_work3,generic_work4,generic_work5]
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection1]
-      end
-
-      it 'should remove last generic work' do
-        expect( Hydra::Works::RemoveGenericWorkFromCollection.call( subject, generic_work5 ) ).to eq generic_work5
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work1,generic_work2,generic_work3,generic_work4]
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection1]
-      end
-
-      it 'should remove middle generic work' do
-        expect( Hydra::Works::RemoveGenericWorkFromCollection.call( subject, generic_work3 ) ).to eq generic_work3
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work1,generic_work2,generic_work4,generic_work5]
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection1]
-      end
-    end
-  end
-
-  context 'with unacceptable generic works' do
-    let(:collection1)    { Hydra::Works::Collection.create }
-    let(:generic_file1)    { Hydra::Works::GenericFile::Base.create }
-    let(:pcdm_collection1) { Hydra::PCDM::Collection.create }
-    let(:pcdm_object1)     { Hydra::PCDM::Object.create }
-    let(:pcdm_file1)       { Hydra::PCDM::File.new }
-    let(:non_PCDM_object)  { "I'm not a PCDM object" }
-    let(:af_base_object)   { ActiveFedora::Base.create }
-
-    let(:error_type)    { ArgumentError }
-    let(:error_message) { 'child_generic_work must be a hydra-works generic work' }
-
-    it 'should NOT remove Hydra::Works::Collection from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, collection1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::Works::GenericFile from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, generic_file1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Collections from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, pcdm_collection1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Objects from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, pcdm_object1 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Files from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, pcdm_file1 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove non-PCDM objects from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, non_PCDM_object ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove AF::Base objects from generic_works aggregation' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( subject, af_base_object ) }.to raise_error(error_type,error_message)
-    end
-  end
-
-  context 'with unacceptable parent collection' do
-    let(:generic_work2)    { Hydra::Works::GenericWork::Base.create }
-    let(:generic_work1)    { Hydra::Works::GenericWork::Base.create }
-    let(:generic_file1)    { Hydra::Works::GenericFile::Base.create }
-    let(:pcdm_collection1) { Hydra::PCDM::Collection.create }
-    let(:pcdm_object1)     { Hydra::PCDM::Object.create }
-    let(:pcdm_file1)       { Hydra::PCDM::File.new }
-    let(:non_PCDM_object)  { "I'm not a PCDM object" }
-    let(:af_base_object)   { ActiveFedora::Base.create }
-
-    let(:error_type)    { ArgumentError }
-    let(:error_message) { 'parent_collection must be a hydra-works collection' }
-
-    it 'should NOT accept Hydra::Works::GenericWork as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( generic_work1, generic_work2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::Works::GenericFile as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( generic_file1, generic_work2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Collections as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( pcdm_collection1, generic_work2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Objects as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( pcdm_object1, generic_work2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Files as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( pcdm_file1, generic_work2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept non-PCDM objects as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( non_PCDM_object, generic_work2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept AF::Base objects as parent collection' do
-      expect{ Hydra::Works::RemoveGenericWorkFromCollection.call( af_base_object, generic_work2 ) }.to raise_error(error_type,error_message)
-    end
-  end
-end

data/spec/hydra/works/services/collection/remove_related_object_spec.rb

@@ -1,128 +0,0 @@
-require 'spec_helper'
-
-describe Hydra::Works::RemoveRelatedObjectFromCollection do
-
-  subject { Hydra::Works::Collection.create }
-
-  let(:related_object1) { Hydra::PCDM::Object.create }
-  let(:related_work2)   { Hydra::Works::GenericWork::Base.create }
-  let(:related_file3)   { Hydra::Works::GenericFile::Base.create }
-  let(:related_object4) { Hydra::PCDM::Object.create }
-  let(:related_work5)   { Hydra::Works::GenericWork::Base.create }
-
-  let(:collection1)   { Hydra::Works::Collection.create }
-  let(:collection2)   { Hydra::Works::Collection.create }
-  let(:generic_work1) { Hydra::Works::GenericWork::Base.create }
-
-
-  describe '#call' do
-    context 'when multiple related objects' do
-      before do
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, related_object1 )
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, related_work2 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection2 )
-        Hydra::Works::AddGenericWorkToCollection.call( subject, generic_work1 )
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, related_file3 )
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, related_object4 )
-        Hydra::Works::AddCollectionToCollection.call( subject, collection1 )
-        Hydra::Works::AddRelatedObjectToCollection.call( subject, related_work5 )
-        subject.save
-        expect( Hydra::Works::GetRelatedObjectsFromCollection.call( subject.reload )).to eq [related_object1,related_work2,related_file3,related_object4,related_work5]
-      end
-
-      it 'should remove first related object' do
-        expect( Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, related_object1 ) ).to eq related_object1
-        expect( Hydra::Works::GetRelatedObjectsFromCollection.call( subject.reload )).to eq [related_work2,related_file3,related_object4,related_work5]
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection1]
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work1]
-      end
-
-      it 'should remove last related object' do
-        expect( Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, related_work5 ) ).to eq related_work5
-        expect( Hydra::Works::GetRelatedObjectsFromCollection.call( subject.reload )).to eq [related_object1,related_work2,related_file3,related_object4]
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection1]
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work1]
-      end
-
-      it 'should remove middle related object' do
-        expect( Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, related_file3 ) ).to eq related_file3
-        expect( Hydra::Works::GetRelatedObjectsFromCollection.call( subject.reload )).to eq [related_object1,related_work2,related_object4,related_work5]
-        expect( Hydra::Works::GetCollectionsFromCollection.call( subject.reload )).to eq [collection2,collection1]
-        expect( Hydra::Works::GetGenericWorksFromCollection.call( subject.reload )).to eq [generic_work1]
-      end
-    end
-  end
-
-  context 'with unacceptable related object' do
-    let(:collection1)      { Hydra::Works::Collection.create }
-    let(:pcdm_collection1) { Hydra::PCDM::Collection.create }
-    let(:pcdm_file1)       { Hydra::PCDM::File.new }
-    let(:non_PCDM_object)  { "I'm not a PCDM object" }
-    let(:af_base_object)   { ActiveFedora::Base.create }
-
-    let(:error_type)    { ArgumentError }
-    let(:error_message) { 'child_related_object must be a pcdm object' }
-
-    it 'should NOT remove Hydra::Works::Collection from related_objects aggregation' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, collection1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Collections from related_objects aggregation' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, pcdm_collection1 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT remove Hydra::PCDM::Files from related_objects aggregation' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, pcdm_file1 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove non-PCDM objects from related_objects aggregation' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, non_PCDM_object ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT remove AF::Base objects from related_objects aggregation' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( subject, af_base_object ) }.to raise_error(error_type,error_message)
-    end
-  end
-
-  context 'with unacceptable parent collection' do
-    let(:related_object2)  { Hydra::PCDM::Object.create }
-    let(:generic_work1)    { Hydra::Works::GenericWork::Base.create }
-    let(:generic_file1)    { Hydra::Works::GenericFile::Base.create }
-    let(:pcdm_collection1) { Hydra::PCDM::Collection.create }
-    let(:pcdm_object1)     { Hydra::PCDM::Object.create }
-    let(:pcdm_file1)       { Hydra::PCDM::File.new }
-    let(:non_PCDM_object)  { "I'm not a PCDM object" }
-    let(:af_base_object)   { ActiveFedora::Base.create }
-
-    let(:error_type)    { ArgumentError }
-    let(:error_message) { 'parent_collection must be a hydra-works collection' }
-
-    it 'should NOT accept Hydra::Works::GenericWork as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( generic_work1, related_object2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::Works::GenericFile as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( generic_file1, related_object2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Collections as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( pcdm_collection1, related_object2 ) }.to raise_error(ArgumentError,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Objects as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( pcdm_object1, related_object2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept Hydra::PCDM::Files as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( pcdm_file1, related_object2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept non-PCDM objects as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( non_PCDM_object, related_object2 ) }.to raise_error(error_type,error_message)
-    end
-
-    it 'should NOT accept AF::Base objects as parent collection' do
-      expect{ Hydra::Works::RemoveRelatedObjectFromCollection.call( af_base_object, related_work2 ) }.to raise_error(error_type,error_message)
-    end
-  end
-end