mongoid-list 0.1.2

data/.gitignore

@@ -0,0 +1,3 @@
+.DS_Store
+Gemfile.lock
+pkg/

data/.rvmrc

@@ -0,0 +1 @@
+rvm 1.9.2@mongoid-list

data/Gemfile

@@ -0,0 +1,2 @@
+source "http://rubygems.org"
+gemspec

data/Guardfile

@@ -0,0 +1,12 @@
+guard 'spork' do
+  watch('Gemfile')
+  watch('Gemfile.lock')
+  watch('test/test_helper.rb')
+end
+
+guard 'minitest' do
+  watch(%r|^test/test_(.*)\.rb|)
+  watch(%r|^test/(.*)_test\.rb|)
+  watch(%r|^lib/(.*)([^/]+)\.rb|)     { |m| "test/#{m[1]}test_#{m[2]}.rb" }
+  watch(%r|^test/test_helper\.rb|)    { "test" }
+end

data/README.md

@@ -0,0 +1 @@
+Needs Documentation

data/Rakefile

@@ -0,0 +1,13 @@
+require "bundler/gem_tasks"
+require 'rake/testtask'
+
+spec = Gem::Specification.load("mongoid-list.gemspec")
+
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+desc "Run tests"
+task :default => :test

data/lib/mongoid-list.rb

@@ -0,0 +1 @@
+require 'mongoid/list'

data/lib/mongoid/list.rb

@@ -0,0 +1,80 @@
+require "mongoid/list/scoping"
+
+module Mongoid
+
+
+  module List
+    extend ActiveSupport::Concern
+    include Mongoid::List::Scoping
+
+    autoload :Collection, 'mongoid/list/collection'
+    autoload :Embedded,   'mongoid/list/embedded'
+
+    included do
+      field :position, type: Integer
+
+      validates :position, numericality: true, on: :update
+
+      index [ include?(Mongoid::Paranoia) ? [ :deleted_at, 1 ] : nil, [ :position, -1 ] ].compact # TODO: MONGOID: Apply a patch
+
+      before_create  :set_initial_position_in_list
+      before_update  :mark_for_update_processing_of_list, if: :position_changed?
+      after_update   :update_positions_in_list!, if: :_process_list_change
+      before_destroy :mark_for_removal_processing_from_list
+      after_destroy  :update_positions_in_list!, if: :_process_list_change
+
+      scope :ordered, order_by: :position.asc
+    end
+
+
+    module ClassMethods
+
+      def update_positions_in_list!(elements)
+        return false if elements.size < count
+        elements.each_with_index do |element, idx|
+          id = element.kind_of?(Hash) ? element['id'] : element
+          self.collection.update({ id: id }, { '$set' => { position: (idx + 1) } })
+        end
+      end
+
+    end
+
+
+    attr_accessor :_process_list_change
+
+
+  private
+
+
+    def set_initial_position_in_list
+      self.position = list_count + 1
+    end
+
+    def mark_for_update_processing_of_list
+      self._process_list_change = if position_moving_up?
+        { min: position_was, max: position, by: -1 }
+      else
+        { min: position, max: position_was, by: 1 }
+      end
+    end
+
+    def position_moving_up?
+      position > position_was
+    end
+
+    def mark_for_removal_processing_from_list
+      self._process_list_change = { min: position, max: nil, by: -1 }
+    end
+
+    def update_positions_in_list!
+      embedded? ? Embedded.new(self).update_positions! : Collection.new(self).update_positions!
+    end
+
+    def list_count
+      embedded? ? Embedded.new(self).count : Collection.new(self).count
+    end
+
+
+  end
+
+end

data/lib/mongoid/list/collection.rb

@@ -0,0 +1,32 @@
+module Mongoid
+  module List
+    class Collection
+
+      attr_accessor :obj
+
+      def initialize(obj)
+        @obj = obj
+      end
+
+      def update_positions!
+        obj.class.collection.update(
+          criteria,
+          { '$inc' => { position: obj._process_list_change[:by] } },
+          multi: true
+        )
+      end
+
+      def count
+        obj.class.where(obj.list_scope_conditions).count
+      end
+
+    private
+
+      def criteria
+        position = { '$lte' => obj._process_list_change[:max], '$gte' => obj._process_list_change[:min] }.delete_if { |k, v| v.nil? }
+        obj.list_scope_conditions.merge({ _id:  { '$ne' => obj.id }, position: position })
+      end
+
+    end
+  end
+end

data/lib/mongoid/list/embedded.rb

@@ -0,0 +1,51 @@
+module Mongoid
+  module List
+    class Embedded
+
+      attr_accessor :obj
+
+      def initialize(obj)
+        @obj = obj
+      end
+
+      def update_positions!
+        items.each do |item|
+          next unless should_operate_on_item?(item)
+          criteria  = { "#{obj.metadata.name.to_sym}._id" => item.id }
+          changes   = { '$inc' => { "#{obj.metadata.name.to_sym}.$.position" => obj._process_list_change[:by] } }
+          _embedded_list_container.class.collection.update(criteria, changes)
+        end
+      end
+
+      def count
+        _embedded_list_container.send(obj.metadata.name.to_sym).excludes(_id: obj.id).where(obj.list_scope_conditions).count
+      end
+
+
+    private
+
+
+      def items
+        _embedded_list_container.send(obj.metadata.name.to_sym)
+      end
+
+      def should_operate_on_item?(item)
+        # TODO: This includes duplicate logic from :list_scope_conditions
+        ![
+          item == obj,
+          obj._process_list_change[:min].present? && item.position < obj._process_list_change[:min],
+          obj._process_list_change[:max].present? && item.position > obj._process_list_change[:max],
+          obj.list_scoped? && item.list_scope_value != obj.list_scope_value
+        ].any?
+      end
+
+      def _embedded_list_container
+        # TODO: MONGOID: Mongoid is not currently setting up the metadata properly so we have to do some extra
+        # work with getting the values we need out of the partial information.
+        obj.send(obj.metadata.inverse_setter.sub('=', '').to_sym)
+      end
+
+
+    end
+  end
+end

data/lib/mongoid/list/scoping.rb

@@ -0,0 +1,23 @@
+module Mongoid
+  module List
+    module Scoping
+
+      def list_scoped?
+        fields["position"].options.has_key?(:scope)
+      end
+
+      def list_scope_field
+        fields["position"].options[:scope]
+      end
+
+      def list_scope_value
+        public_send(list_scope_field)
+      end
+
+      def list_scope_conditions
+        list_scoped? ? { list_scope_field.to_sym => list_scope_value } : {}
+      end
+
+    end
+  end
+end

data/lib/mongoid/list/version.rb

@@ -0,0 +1,5 @@
+module Mongoid
+  module List
+    VERSION = "0.1.2"
+  end
+end

data/mongoid-list.gemspec

@@ -0,0 +1,31 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib/', __FILE__)
+$:.unshift lib unless $:.include?(lib)
+
+require "mongoid/list/version"
+
+Gem::Specification.new do |s|
+  s.name          = 'mongoid-list'
+  s.version       = Mongoid::List::VERSION
+  s.date          = '2011-10-28'
+  s.authors       = [ 'Dave Krupinski' ]
+  s.email         = 'dave@davekrupinski.com'
+  s.summary       = 'Simple list behavior for Mongoid'
+
+  s.add_dependency('mongoid', [ '>= 2.0.0' ])
+
+  s.add_development_dependency('bson_ext')
+  s.add_development_dependency('minitest', [ '>= 2.7.0' ])
+  s.add_development_dependency('mini_shoulda', [ '>= 0.4.0' ])
+  s.add_development_dependency('spork', [ '>= 0.9.0.rc' ])
+  s.add_development_dependency('spork-testunit', [ '>= 0.0.6' ])
+  s.add_development_dependency('guard-minitest', [ '>= 0.4.0' ])
+  s.add_development_dependency('guard-spork', [ '>= 0.3.1' ])
+  s.add_development_dependency('turn', [ '>= 0.8.3' ])
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+end

data/test/mongoid/list/scoping_test.rb

@@ -0,0 +1,354 @@
+require 'test_helper'
+
+describe Mongoid::List::Scoping do
+
+  describe "#list_scope_field" do
+
+    let :obj do
+      Scoped.create
+    end
+
+    should "be :group" do
+      assert_equal :group, obj.list_scope_field
+    end
+
+  end
+
+
+  describe "#list_scope_conditions" do
+
+    context "when unscoped" do
+
+      let :obj do
+        Simple.new
+      end
+
+      let :expected_conditions do
+        { }
+      end
+
+      should "be an empty hash" do
+        assert_equal expected_conditions, obj.list_scope_conditions
+      end
+
+    end
+
+    context "when scoped" do
+
+      let :obj do
+        Scoped.new(group: "a grouping")
+      end
+
+      let :expected_conditions do
+        { group: "a grouping" }
+      end
+
+      should "have be for a :group of 'a grouping'" do
+        assert_equal expected_conditions, obj.list_scope_conditions
+      end
+    end
+
+  end
+
+
+  describe "Initializing in multiple scopes" do
+
+    context "on a Collection" do
+
+      setup do
+        @group1_1 = Scoped.create(group: 1)
+        @group2_1 = Scoped.create(group: 2)
+        @group2_2 = Scoped.create(group: 2)
+      end
+
+      should "default @group1_1 to a :position of 1" do
+        assert_equal 1, @group1_1.position
+      end
+
+      should "default @group2_1 to a :position of 1" do
+        assert_equal 1, @group2_1.position
+      end
+
+      should "default @group2_2 to a :position of 2" do
+        assert_equal 2, @group2_2.position
+      end
+
+    end
+
+    context "on Embedded Documents" do
+
+      setup do
+        @container = Container.create
+        @group1_1 = @container.scoped_items.create(group: 1)
+        @group1_2 = @container.scoped_items.create(group: 1)
+        @group2_1 = @container.scoped_items.create(group: 2)
+        @group2_2 = @container.scoped_items.create(group: 2)
+        @group2_3 = @container.scoped_items.create(group: 2)
+        @group3_1 = @container.scoped_items.create(group: 3)
+      end
+
+      should "default @group1_1 to a :position of 1" do
+        assert_equal 1, @group1_1.position
+      end
+
+      should "default @group1_2 to a :position of 2" do
+        assert_equal 2, @group1_2.position
+      end
+
+      should "default @group2_1 to a :position of 1" do
+        assert_equal 1, @group2_1.position
+      end
+
+      should "default @group2_2 to a :position of 2" do
+        assert_equal 2, @group2_2.position
+      end
+
+      should "default @group2_3 to a :position of 3" do
+        assert_equal 3, @group2_3.position
+      end
+
+      should "default @group3_1 to a :position of 1" do
+        assert_equal 1, @group3_1.position
+      end
+
+    end
+  end
+
+
+
+  describe "#update :position" do
+
+    context "for Collection List" do
+
+      setup do
+        @group1_1 = Scoped.create(group: 1)
+        @group1_2 = Scoped.create(group: 1)
+        @group2_1 = Scoped.create(group: 2)
+        @group2_2 = Scoped.create(group: 2)
+        @group2_3 = Scoped.create(group: 2)
+      end
+
+      context "@group1_2 to :position 1" do
+
+        setup do
+          @group1_2.update_attribute(:position, 1)
+        end
+
+        should "have updated @group1_1 to :position of 2" do
+          assert_equal 1, @group1_1.position
+          assert_equal 2, @group1_1.reload.position
+        end
+
+        should "not have updated :group2_1's :position" do
+          assert_equal @group2_1.position, @group2_1.reload.position
+        end
+
+        should "not have updated :group2_2's :position" do
+          assert_equal @group2_2.position, @group2_2.reload.position
+        end
+
+        should "not have updated :group2_3's :position" do
+          assert_equal @group2_3.position, @group2_3.reload.position
+        end
+
+      end
+
+
+      context "@group2_2 to :position 3" do
+
+        setup do
+          @group2_2.update_attribute(:position, 3)
+        end
+
+        should "not have updated @group1_1's :position" do
+          assert_equal @group1_1.position, @group1_1.reload.position
+        end
+
+        should "not have updated @group1_2's :position" do
+          assert_equal @group1_2.position, @group1_2.reload.position
+        end
+
+        should "not have updated @group2_1's :position" do
+          assert_equal @group2_1.position, @group2_1.reload.position
+        end
+
+        should "have updated @group2_2's :position to 3" do
+          assert_equal 3, @group2_2.position
+        end
+
+        should "have updated @group2_3's :position to 2" do
+          assert_equal 3, @group2_3.position
+          assert_equal 2, @group2_3.reload.position
+        end
+      end
+
+    end
+
+
+    context "for an Embedded List" do
+
+      setup do
+        @container = Container.create
+        @group1_1 = @container.scoped_items.create(group: 1)
+        @group1_2 = @container.scoped_items.create(group: 1)
+        @group2_1 = @container.scoped_items.create(group: 2)
+        @group2_2 = @container.scoped_items.create(group: 2)
+        @group2_3 = @container.scoped_items.create(group: 2)
+      end
+
+      context "moving @group1_1 to :position 2" do
+
+        setup do
+          @group1_1.update_attributes(position: 2)
+        end
+
+        should "update @group1_1's :position to 2" do
+          assert_equal 2, @group1_1.position
+        end
+
+        should "update @group1_2's :position to 1" do
+          assert_equal 2, @group1_2.position
+          assert_equal 1, @group1_2.reload.position
+        end
+
+        should "not update @group2_1's :position" do
+          assert_equal 1, @group2_1.position
+          assert_equal 1, @group2_1.reload.position
+        end
+
+        should "not update @group2_2's :position" do
+          assert_equal 2, @group2_2.position
+          assert_equal 2, @group2_2.reload.position
+        end
+
+        should "not update @group2_3's :position" do
+          assert_equal 3, @group2_3.position
+          assert_equal 3, @group2_3.reload.position
+        end
+      end
+
+
+      context "moving @group2_3 to :position 1" do
+
+        setup do
+          @group2_3.update_attributes(position: 1)
+        end
+
+        should "not update @group1_1's :position" do
+          assert_equal 1, @group1_1.position
+          assert_equal 1, @group1_1.reload.position
+        end
+
+        should "not update @group1_2's :position" do
+          assert_equal 2, @group1_2.position
+          assert_equal 2, @group1_2.reload.position
+        end
+
+        should "update @group2_1's :position to 2" do
+          assert_equal 1, @group2_1.position
+          assert_equal 2, @group2_1.reload.position
+        end
+
+        should "update @group2_2's :position to 3" do
+          assert_equal 2, @group2_2.position
+          assert_equal 3, @group2_2.reload.position
+        end
+
+        should "update @group2_3's :position to 1" do
+          assert_equal 1, @group2_3.position
+          assert_equal 1, @group2_3.reload.position
+        end
+      end
+
+    end
+
+  end
+
+
+
+  describe "#destroy" do
+
+    context "from a Collection" do
+
+      setup do
+        @group1_1 = Scoped.create(group: 1)
+        @group1_2 = Scoped.create(group: 1)
+        @group2_1 = Scoped.create(group: 2)
+        @group2_2 = Scoped.create(group: 2)
+        @group2_3 = Scoped.create(group: 2)
+      end
+
+      context "for @group2_1" do
+
+        setup do
+          @group2_1.destroy
+        end
+
+        should "not update @group1_1's :position" do
+          assert_equal 1, @group1_1.position
+          assert_equal 1, @group1_1.reload.position
+        end
+
+        should "not update @group1_2's :position" do
+          assert_equal 2, @group1_2.position
+          assert_equal 2, @group1_2.reload.position
+        end
+
+        should "update @group2_2's :position to 1" do
+          assert_equal 2, @group2_2.position
+          assert_equal 1, @group2_2.reload.position
+        end
+
+        should "update @group2_3's :position to 2" do
+          assert_equal 3, @group2_3.position
+          assert_equal 2, @group2_3.reload.position
+        end
+      end
+
+    end
+
+
+    context "from an Embedded Collection" do
+
+      setup do
+        @container = Container.create
+        @group1_1 = @container.scoped_items.create(group: 1)
+        @group1_2 = @container.scoped_items.create(group: 1)
+        @group2_1 = @container.scoped_items.create(group: 2)
+        @group2_2 = @container.scoped_items.create(group: 2)
+        @group2_3 = @container.scoped_items.create(group: 2)
+      end
+
+      context "for @group2_2" do
+
+        setup do
+          @group2_2.destroy
+        end
+
+        should "not update @group1_1's :position" do
+          assert_equal 1, @group1_1.position
+          assert_equal 1, @group1_1.reload.position
+        end
+
+        should "not update @group1_2's :position" do
+          assert_equal 2, @group1_2.position
+          assert_equal 2, @group1_2.reload.position
+        end
+
+        should "not update @group2_1's :position" do
+          assert_equal 1, @group2_1.position
+          assert_equal 1, @group2_1.reload.position
+        end
+
+        should "update @group2_3's :position to 2" do
+          assert_equal 3, @group2_3.position
+          assert_equal 2, @container.reload.scoped_items.find(@group2_3.id).position
+        end
+      end
+
+    end
+
+
+  end
+
+end

data/test/mongoid/list_test.rb

@@ -0,0 +1,339 @@
+require 'test_helper'
+
+
+describe Mongoid::List do
+
+
+  context "Setting Initial Position" do
+    setup do
+      @list1 = Simple.create
+      @list2 = Simple.create
+    end
+
+    should "have set @list1's position to 1" do
+      assert_equal 1, @list1.position
+    end
+
+    should "have set @list2's position to 2" do
+      assert_equal 2, @list2.position
+    end
+  end
+
+
+
+  context "Setting Initial Position in Embedded Collection" do
+    setup do
+      @container = Container.create
+      @list1 = @container.items.create
+      @list2 = @container.items.create
+      @list3 = @container.items.create
+      @unrelated_list = Container.create.items.create
+    end
+
+    should "have created the container" do
+      assert_equal 3, @container.items.count
+    end
+
+
+    should "have set the initial positions for each list item" do
+      assert_equal 1, @list1.position
+      assert_equal 2, @list2.position
+      assert_equal 3, @list3.position
+    end
+
+    should "have also set the @unrelated_list's position independently" do
+      assert_equal 1, @unrelated_list.position
+    end
+  end
+
+
+
+  context "Updating List Position" do
+    setup do
+      @list1 = Simple.create
+      @list2 = Simple.create
+      @list3 = Simple.create
+      @list4 = Simple.create
+    end
+
+    should "have set initial positions" do
+      assert_equal 1, @list1.position
+      assert_equal 2, @list2.position
+      assert_equal 3, @list3.position
+      assert_equal 4, @list4.position
+    end
+
+    context "for @list2 going to position of 1" do
+      setup do
+        @list2.update_attributes(:position => 1)
+        @list1.reload; @list2.reload; @list3.reload; @list4.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 2, @list1.position
+        assert_equal 1, @list2.position
+        assert_equal 3, @list3.position
+        assert_equal 4, @list4.position
+      end
+    end
+
+    context "for @list3 going to position of 1" do
+      setup do
+        @list3.update_attributes(:position => 1)
+        @list1.reload; @list2.reload; @list3.reload; @list4.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 2, @list1.position
+        assert_equal 3, @list2.position
+        assert_equal 1, @list3.position
+        assert_equal 4, @list4.position
+      end
+    end
+
+    context "for @list1 going to position of 2" do
+      setup do
+        @list1.update_attributes(:position => 2)
+        @list1.reload; @list2.reload; @list3.reload; @list4.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 2, @list1.position
+        assert_equal 1, @list2.position
+        assert_equal 3, @list3.position
+        assert_equal 4, @list4.position
+      end
+    end
+
+    context "for @list1 going to position of 3" do
+      setup do
+        @list1.update_attributes(:position => 3)
+        @list1.reload; @list2.reload; @list3.reload; @list4.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 3, @list1.position
+        assert_equal 1, @list2.position
+        assert_equal 2, @list3.position
+        assert_equal 4, @list4.position
+      end
+    end
+  end
+
+
+
+  context "Updating List Position in Embedded Collection" do
+    setup do
+      @container = Container.create
+      @list1 = @container.items.create
+      @list2 = @container.items.create
+      @list3 = @container.items.create
+      @list4 = @container.items.create
+    end
+
+    should "have set initial positions" do
+      assert_equal 1, @list1.position
+      assert_equal 2, @list2.position
+      assert_equal 3, @list3.position
+      assert_equal 4, @list4.position
+    end
+
+    context "for @list2 going to position of 1" do
+      setup do
+        @list2.update_attributes(:position => 1)
+        @container.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 2, @container.items.find(@list1.id).position
+        assert_equal 1, @container.items.find(@list2.id).position
+        assert_equal 3, @container.items.find(@list3.id).position
+        assert_equal 4, @container.items.find(@list4.id).position
+      end
+    end
+
+    context "for @list3 going to position of 1" do
+      setup do
+        @list3.update_attributes(:position => 1)
+        @container.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 2, @container.items.find(@list1.id).position
+        assert_equal 3, @container.items.find(@list2.id).position
+        assert_equal 1, @container.items.find(@list3.id).position
+        assert_equal 4, @container.items.find(@list4.id).position
+      end
+    end
+
+    context "for @list1 going to position of 2" do
+      setup do
+        @list1.update_attributes(:position => 2)
+        @container.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 2, @container.items.find(@list1.id).position
+        assert_equal 1, @container.items.find(@list2.id).position
+        assert_equal 3, @container.items.find(@list3.id).position
+        assert_equal 4, @container.items.find(@list4.id).position
+      end
+    end
+
+    context "for @list1 going to position of 3" do
+      setup do
+        @list1.update_attributes(:position => 3)
+        @container.reload
+      end
+
+      should "have updated everyone's :position" do
+        assert_equal 3, @container.items.find(@list1.id).position
+        assert_equal 1, @container.items.find(@list2.id).position
+        assert_equal 2, @container.items.find(@list3.id).position
+        assert_equal 4, @container.items.find(@list4.id).position
+      end
+    end
+  end
+
+
+
+  context "Removing an Item from a List" do
+    setup do
+      @list1 = Simple.create
+      @list2 = Simple.create
+      @list3 = Simple.create
+      @list4 = Simple.create
+    end
+
+    context "from the first position" do
+      setup do
+        @list1.destroy
+        @list2.reload; @list3.reload; @list4.reload
+      end
+
+      should "have moved all other items up" do
+        assert_equal 1, @list2.position
+        assert_equal 2, @list3.position
+        assert_equal 3, @list4.position
+      end
+    end
+
+    context "removing from the 2nd position" do
+      setup do
+        @list2.destroy
+        @list1.reload; @list3.reload; @list4.reload
+      end
+
+      should "have kept @list1 where it was" do
+        assert_equal 1, @list1.position
+      end
+
+      should "have moved lower items up" do
+        assert_equal 2, @list3.position
+        assert_equal 3, @list4.position
+      end
+    end
+
+    context "removing from the 4th and last position" do
+      setup do
+        @list4.destroy
+        @list1.reload; @list2.reload; @list3.reload
+      end
+
+      should "have kept everything else where it was" do
+        assert_equal 1, @list1.position
+        assert_equal 2, @list2.position
+        assert_equal 3, @list3.position
+      end
+    end
+  end
+
+
+
+  context "Removing an Item from an Embedded List" do
+    setup do
+      @container = Container.create
+      @list1 = @container.items.create
+      @list2 = @container.items.create
+      @list3 = @container.items.create
+      @list4 = @container.items.create
+    end
+
+    context "from the first position" do
+      setup do
+        @list1.destroy
+        @container.reload
+      end
+
+      should "have moved all other items up" do
+        assert_equal 1, @container.items.find(@list2.id).position
+        assert_equal 2, @container.items.find(@list3.id).position
+        assert_equal 3, @container.items.find(@list4.id).position
+      end
+    end
+
+    context "removing from the 2nd position" do
+      setup do
+        @list2.destroy
+        @container.reload
+      end
+
+      should "have kept @list1 where it was" do
+        assert_equal 1, @container.items.find(@list1.id).position
+      end
+
+      should "have moved lower items up" do
+        assert_equal 2, @container.items.find(@list3.id).position
+        assert_equal 3, @container.items.find(@list4.id).position
+      end
+    end
+
+    context "removing from the 4th and last position" do
+      setup do
+        @list4.destroy
+        @container.reload
+      end
+
+      should "have kept everything else where it was" do
+        assert_equal 1, @container.items.find(@list1.id).position
+        assert_equal 2, @container.items.find(@list2.id).position
+        assert_equal 3, @container.items.find(@list3.id).position
+      end
+    end
+  end
+
+
+
+  context "#list_scoped?" do
+
+
+    context "for Simple (unscoped)" do
+
+      let(:obj) do
+        Simple.new
+      end
+
+      should "be nil" do
+        assert !obj.list_scoped? 
+      end
+
+    end
+
+
+    context "for Scoped" do
+
+      let(:obj) do
+        Scoped.new
+      end
+
+      should "be :group" do
+        assert obj.list_scoped?
+      end
+
+    end
+
+  end
+
+
+end
+

data/test/support/models/container.rb

@@ -0,0 +1,8 @@
+class Container
+  
+  include Mongoid::Document
+  
+  embeds_many :items, class_name: 'Embedded', order: :position
+  embeds_many :scoped_items, class_name: 'ScopedEmbedded', order: :position
+
+end

data/test/support/models/embedded.rb

@@ -0,0 +1,8 @@
+class Embedded
+
+  include Mongoid::Document
+  include Mongoid::List
+  
+  embedded_in :container
+
+end

data/test/support/models/scoped.rb

@@ -0,0 +1,9 @@
+class Scoped
+
+  include Mongoid::Document
+  include Mongoid::List
+
+  field :group, type: String
+  field :position, type: Integer, scope: :group
+
+end

data/test/support/models/scoped_embedded.rb

@@ -0,0 +1,11 @@
+class ScopedEmbedded
+
+  include Mongoid::Document
+  include Mongoid::List
+
+  embedded_in :container
+
+  field :group, type: String
+  field :position, type: Integer, scope: :group
+
+end

data/test/support/models/simple.rb

@@ -0,0 +1,4 @@
+class Simple
+  include Mongoid::Document
+  include Mongoid::List
+end

data/test/test_helper.rb

@@ -0,0 +1,27 @@
+gem 'minitest'
+
+require 'mini_shoulda'
+require 'minitest/autorun'
+require 'turn'
+require 'spork'
+require 'mongoid'
+require 'mongoid-list'
+
+Mongoid.configure do |config|
+  database = Mongo::Connection.new.db("mongoid-list_test")
+  database.add_user("mongoid", "test")
+  config.master = database
+  config.logger = nil
+end
+
+Dir["#{File.dirname(__FILE__)}/support/**/*.rb"].each { |f| require f }
+
+Spork.prefork do
+end
+
+Spork.each_run do
+end
+
+MiniTest::Spec.add_teardown_hook do
+  Mongoid.purge!
+end

metadata

@@ -0,0 +1,173 @@
+--- !ruby/object:Gem::Specification
+name: mongoid-list
+version: !ruby/object:Gem::Version
+  version: 0.1.2
+  prerelease: 
+platform: ruby
+authors:
+- Dave Krupinski
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2011-10-28 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: mongoid
+  requirement: &2161351780 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.0.0
+  type: :runtime
+  prerelease: false
+  version_requirements: *2161351780
+- !ruby/object:Gem::Dependency
+  name: bson_ext
+  requirement: &2161351360 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *2161351360
+- !ruby/object:Gem::Dependency
+  name: minitest
+  requirement: &2161350800 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.7.0
+  type: :development
+  prerelease: false
+  version_requirements: *2161350800
+- !ruby/object:Gem::Dependency
+  name: mini_shoulda
+  requirement: &2161350280 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.4.0
+  type: :development
+  prerelease: false
+  version_requirements: *2161350280
+- !ruby/object:Gem::Dependency
+  name: spork
+  requirement: &2161349740 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.9.0.rc
+  type: :development
+  prerelease: false
+  version_requirements: *2161349740
+- !ruby/object:Gem::Dependency
+  name: spork-testunit
+  requirement: &2161349160 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.0.6
+  type: :development
+  prerelease: false
+  version_requirements: *2161349160
+- !ruby/object:Gem::Dependency
+  name: guard-minitest
+  requirement: &2161348560 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.4.0
+  type: :development
+  prerelease: false
+  version_requirements: *2161348560
+- !ruby/object:Gem::Dependency
+  name: guard-spork
+  requirement: &2161347840 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.3.1
+  type: :development
+  prerelease: false
+  version_requirements: *2161347840
+- !ruby/object:Gem::Dependency
+  name: turn
+  requirement: &2161347060 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.8.3
+  type: :development
+  prerelease: false
+  version_requirements: *2161347060
+description: 
+email: dave@davekrupinski.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rvmrc
+- Gemfile
+- Guardfile
+- LICENSE
+- README.md
+- Rakefile
+- lib/mongoid-list.rb
+- lib/mongoid/list.rb
+- lib/mongoid/list/collection.rb
+- lib/mongoid/list/embedded.rb
+- lib/mongoid/list/scoping.rb
+- lib/mongoid/list/version.rb
+- mongoid-list.gemspec
+- test/mongoid/list/scoping_test.rb
+- test/mongoid/list_test.rb
+- test/support/models/container.rb
+- test/support/models/embedded.rb
+- test/support/models/scoped.rb
+- test/support/models/scoped_embedded.rb
+- test/support/models/simple.rb
+- test/test_helper.rb
+homepage: 
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: Simple list behavior for Mongoid
+test_files:
+- test/mongoid/list/scoping_test.rb
+- test/mongoid/list_test.rb
+- test/support/models/container.rb
+- test/support/models/embedded.rb
+- test/support/models/scoped.rb
+- test/support/models/scoped_embedded.rb
+- test/support/models/simple.rb
+- test/test_helper.rb