shoulda 2.11.3 → 3.0.0.beta1

data/test/other/helpers_test.rb

@@ -1,317 +0,0 @@
-require 'test_helper'
-require 'action_mailer'
-require 'mocha'
-
-class HelpersTest < ActiveSupport::TestCase # :nodoc:
-
-  context "given delivered emails" do
-    setup do
-      email1 = stub(:subject => "one", :to => ["none1@email.com"])
-      email2 = stub(:subject => "two", :to => ["none2@email.com"])
-      ActionMailer::Base.stubs(:deliveries).returns([email1, email2])
-    end
-
-    should "have sent an email" do
-      assert_sent_email
-
-      assert_raises(Test::Unit::AssertionFailedError) do
-        assert_did_not_send_email
-      end
-    end
-
-    should "find email one" do
-      assert_sent_email do |e|
-        e.subject =~ /one/
-      end
-    end
-
-    should "not find an email that doesn't exist" do
-      assert_raises(Test::Unit::AssertionFailedError) do
-        assert_sent_email do |e|
-          e.subject =~ /whatever/
-        end
-      end
-    end
-  end
-
-  context "when there are no emails" do
-    setup do
-      ActionMailer::Base.stubs(:deliveries).returns([])
-    end
-
-    should "not have sent an email" do
-      assert_did_not_send_email
-
-      assert_raises(Test::Unit::AssertionFailedError) do
-        assert_sent_email
-      end
-    end
-  end
-
-  context "an array of values" do
-    setup do
-      @a = ['abc', 'def', 3]
-    end
-
-    [/b/, 'abc', 3].each do |x|
-      should "contain #{x.inspect}" do
-        assert_raises(Test::Unit::AssertionFailedError) do
-          assert_does_not_contain @a, x
-        end
-        assert_contains @a, x
-      end
-    end
-
-    should "not contain 'wtf'" do
-      assert_raises(Test::Unit::AssertionFailedError) {assert_contains @a, 'wtf'}
-      assert_does_not_contain @a, 'wtf'
-    end
-
-    should "be the same as another array, ordered differently" do
-      assert_same_elements(@a, [3, "def", "abc"])
-      assert_raises(Test::Unit::AssertionFailedError) do
-        assert_same_elements(@a, [3, 3, "def", "abc"])
-      end
-      assert_raises(Test::Unit::AssertionFailedError) do
-        assert_same_elements([@a, "abc"].flatten, [3, 3, "def", "abc"])
-      end
-    end
-  end
-
-  context "an array of values" do
-    setup do
-      @a = [1, 2, "(3)"]
-    end
-
-    context "after adding another value" do
-      setup do
-        @a.push(4)
-      end
-
-      should_change("the number of elements", :by => 1) { @a.length }
-      should_change("the number of elements", :from => 3) { @a.length }
-      should_change("the number of elements", :to => 4) { @a.length }
-      should_change("the first element", :by => 0) { @a[0] }
-      should_not_change("the first element") { @a[0] }
-    end
-
-    context "after replacing it with an array of strings" do
-      setup do
-        @a = %w(a b c d e f)
-      end
-
-      should_change("the number of elements", :by => 3) { @a.length }
-      should_change("the number of elements", :from => 3, :to => 6, :by => 3) { @a.length }
-      should_change("the first element") { @a[0] }
-      should_change("the second element", :from => 2, :to => "b") { @a[1] }
-      should_change("the third element", :from => /\d/, :to => /\w/) { @a[2] }
-      should_change("the last element", :to => String) { @a[3] }
-    end
-  end
-
-  context "assert_good_value" do
-    should "validate a good email address" do
-      assert_good_value User.new, :email, "good@example.com"
-    end
-
-    should "validate a good SSN with a custom message" do
-      assert_good_value User.new, :ssn, "xxxxxxxxx", /length/
-    end
-
-    should "fail to validate a bad email address" do
-      assert_raises Test::Unit::AssertionFailedError do
-        assert_good_value User.new, :email, "bad"
-      end
-    end
-
-    should "fail to validate a bad SSN that is too short" do
-      assert_raises Test::Unit::AssertionFailedError do
-        assert_good_value User.new, :ssn, "x", /length/
-      end
-    end
-
-    should "accept a class as the first argument" do
-      assert_good_value User, :email, "good@example.com"
-    end
-  end
-
-  context "assert_bad_value" do
-    should "invalidate a bad email address" do
-      assert_bad_value User.new, :email, "bad"
-    end
-
-    should "invalidate a bad SSN with a custom message" do
-      assert_bad_value User.new, :ssn, "x", /length/
-    end
-
-    should "fail to invalidate a good email address" do
-      assert_raises Test::Unit::AssertionFailedError do
-        assert_bad_value User.new, :email, "good@example.com"
-      end
-    end
-
-    should "fail to invalidate a good SSN" do
-      assert_raises Test::Unit::AssertionFailedError do
-        assert_bad_value User.new, :ssn, "xxxxxxxxx", /length/
-      end
-    end
-
-    should "accept a class as the first argument" do
-      assert_bad_value User, :email, "bad"
-    end
-  end
-
-  context "a matching matcher" do
-    setup do
-      @matcher = stub('matcher', :matches?                 => true,
-                                 :failure_message          => 'bad failure message',
-                                 :negative_failure_message => 'big time failure')
-    end
-
-    should "pass when given to assert_accepts with no message expectation" do
-      assert_accepts @matcher, 'target'
-    end
-
-    should "pass when given to assert_accepts with a matching message" do
-      assert_accepts @matcher, 'target', :message => /big time/
-    end
-
-    should "fail when given to assert_accepts with non-matching message" do
-      assert_raise Test::Unit::AssertionFailedError do
-        assert_accepts @matcher, 'target', :message => /small time/
-      end
-    end
-
-    context "when given to assert_rejects" do
-      setup do
-        begin
-          assert_rejects @matcher, 'target'
-        rescue Test::Unit::AssertionFailedError => @error
-        end
-      end
-
-      should "fail" do
-        assert_not_nil @error
-      end
-
-      should "use the error message from the matcher" do
-        assert_equal 'big time failure', @error.message
-      end
-    end
-  end
-
-  context "a non-matching matcher" do
-    setup do
-      @matcher = stub('matcher', :matches?                 => false,
-                                 :failure_message          => 'big time failure',
-                                 :negative_failure_message => 'bad failure message')
-    end
-
-    should "pass when given to assert_rejects with no message expectation" do
-      assert_rejects @matcher, 'target'
-    end
-
-    should "pass when given to assert_rejects with a matching message" do
-      assert_rejects @matcher, 'target', :message => /big time/
-    end
-
-    should "fail when given to assert_rejects with a non-matching message" do
-      assert_raise Test::Unit::AssertionFailedError do
-        assert_rejects @matcher, 'target', :message => /small time/
-      end
-    end
-
-    context "when given to assert_accepts" do
-      setup do
-        begin
-          assert_accepts @matcher, 'target'
-        rescue Test::Unit::AssertionFailedError => @error
-        end
-      end
-
-      should "fail" do
-        assert_not_nil @error
-      end
-
-      should "use the error message from the matcher" do
-        assert_equal 'big time failure', @error.message
-      end
-    end
-  end
-
-  should "assign context to a support matching on assert_accepts" do
-    matcher = stub('matcher', :matches? => true)
-    matcher.expects(:in_context).with(self)
-    assert_accepts matcher, nil
-  end
-
-  should "assign context to a support matching on assert_rejects" do
-    matcher = stub('matcher', :matches? => false)
-    matcher.expects(:in_context).with(self)
-    assert_rejects matcher, nil
-  end
-
-  context "given one treat exists and one post exists" do
-    setup do
-      Treat.create!
-      Post.create!(:title => 'title', :body => 'body', :user_id => 1)
-    end
-
-    teardown do
-      Treat.delete_all
-      Post.delete_all
-    end
-
-    context "creating a treat" do
-      setup do
-        Treat.create!
-      end
-
-      should_create :treat
-      should_fail do
-        should_create :post
-      end
-    end
-
-    context "creating a treat and a post" do
-      setup do
-        Treat.create!
-        Post.create!(:title => 'title 2', :body => 'body', :user_id => 1)
-      end
-
-      should_create :treat
-      should_create :post
-    end
-
-    context "destroying a treat" do
-      setup do
-        Treat.first.destroy
-      end
-
-      should_destroy :treat
-      should_fail do
-        should_destroy :post
-      end
-    end
-
-    context "destroying a treat and a post" do
-      setup do
-        Treat.first.destroy
-        Post.first.destroy
-      end
-
-      should_destroy :treat
-      should_destroy :post
-    end
-
-    context "doing nothing" do
-      should_fail do
-        should_create :treat
-      end
-
-      should_fail do
-        should_destroy :treat
-      end
-    end
-  end
-end

data/test/other/private_helpers_test.rb

@@ -1,32 +0,0 @@
-require 'test_helper'
-
-class PrivateHelpersTest < ActiveSupport::TestCase # :nodoc:
-  include Shoulda::Private
-  context "get_options!" do
-    should "remove opts from args" do
-      args = [:a, :b, {}]
-      get_options!(args)
-      assert_equal [:a, :b], args
-    end
-
-    should "return wanted opts in order" do
-      args = [{:one => 1, :two => 2}]
-      one, two = get_options!(args, :one, :two)
-      assert_equal 1, one
-      assert_equal 2, two
-    end
-
-    should "raise ArgumentError if given unwanted option" do
-      args = [{:one => 1, :two => 2}]
-      assert_raises ArgumentError do
-        get_options!(args, :one)
-      end
-    end
-
-    should "return single wanted option" do
-      args = [:a, :b, {:class => Object}]
-      klass = get_options!(args,:class)
-      assert_equal Object, klass
-    end
-  end
-end

data/test/other/should_test.rb

@@ -1,271 +0,0 @@
-require 'test_helper'
-
-class ShouldTest < ActiveSupport::TestCase # :nodoc:
-  should "be able to define a should statement outside of a context" do
-    assert true
-  end
-
-  should "see the name of my class as ShouldTest" do
-    assert_equal "ShouldTest", self.class.name
-  end
-
-  def self.should_see_class_methods
-    should "be able to see class methods" do
-      assert true
-    end
-  end
-
-  def self.should_be_able_to_setup_a_should_eventually_in_a_class_method
-    should "be able to setup a should eventually in a class method"
-  end
-
-  def self.should_see_a_context_block_like_a_Test_Unit_class
-    should "see a context block as a Test::Unit class" do
-      assert_equal "ShouldTest", self.class.name
-    end
-  end
-
-  def self.should_see_blah
-    should "see @blah through a macro" do
-      assert @blah
-    end
-  end
-
-  def self.should_not_see_blah
-    should "not see @blah through a macro" do
-      assert_nil @blah
-    end
-  end
-
-  def self.should_be_able_to_make_context_macros(prefix = nil)
-    context "a macro" do
-      should "have the tests named correctly" do
-        assert_match(/^test: #{prefix}a macro should have the tests named correctly/, self.to_s)
-      end
-    end
-  end
-
-  context "Context" do
-
-    should_see_class_methods
-    should_see_a_context_block_like_a_Test_Unit_class
-    should_be_able_to_make_context_macros("Context ")
-    should_be_able_to_setup_a_should_eventually_in_a_class_method
-
-    should "not define @blah" do
-      assert ! self.instance_variables.include?("@blah")
-    end
-
-    should_not_see_blah
-
-    should "be able to define a should statement" do
-      assert true
-    end
-
-    should "see the name of my class as ShouldTest" do
-      assert_equal "ShouldTest", self.class.name
-    end
-
-    context "with a subcontext" do
-      should_be_able_to_make_context_macros("Context with a subcontext ")
-    end
-  end
-
-  context "Context with setup block" do
-    setup do
-      @blah = "blah"
-    end
-
-    should "have @blah == 'blah'" do
-      assert_equal "blah", @blah
-    end
-    should_see_blah
-
-    should "have name set right" do
-      assert_match(/^test: Context with setup block/, self.to_s)
-    end
-
-    context "and a subcontext" do
-      setup do
-        @blah = "#{@blah} twice"
-      end
-
-      should "be named correctly" do
-        assert_match(/^test: Context with setup block and a subcontext should be named correctly/, self.to_s)
-      end
-
-      should "run the setup methods in order" do
-        assert_equal @blah, "blah twice"
-      end
-      should_see_blah
-    end
-  end
-
-  context "Another context with setup block" do
-    setup do
-      @blah = "foo"
-    end
-
-    should "have @blah == 'foo'" do
-      assert_equal "foo", @blah
-    end
-
-    should "have name set right" do
-      assert_match(/^test: Another context with setup block/, self.to_s)
-    end
-    should_see_blah
-  end
-
-  should_eventually "pass, since it's a should_eventually" do
-    flunk "what?"
-  end
-
-  # Context creation and naming
-
-  def test_should_create_a_new_context
-    assert_nothing_raised do
-      Shoulda::Context.new("context name", self) do; end
-    end
-  end
-
-  def test_should_create_a_nested_context
-    assert_nothing_raised do
-      parent = Shoulda::Context.new("Parent", self) do; end
-      child  = Shoulda::Context.new("Child", parent) do; end
-    end
-  end
-
-  def test_should_name_a_contexts_correctly
-    parent     = Shoulda::Context.new("Parent", self) do; end
-    child      = Shoulda::Context.new("Child", parent) do; end
-    grandchild = Shoulda::Context.new("GrandChild", child) do; end
-
-    assert_equal "Parent", parent.full_name
-    assert_equal "Parent Child", child.full_name
-    assert_equal "Parent Child GrandChild", grandchild.full_name
-  end
-
-  # Should statements
-
-  def test_should_have_should_hashes_when_given_should_statements
-    context = Shoulda::Context.new("name", self) do
-      should "be good" do; end
-      should "another" do; end
-    end
-
-    names = context.shoulds.map {|s| s[:name]}
-    assert_equal ["another", "be good"], names.sort
-  end
-
-  # setup and teardown
-
-  def test_should_capture_setup_and_teardown_blocks
-    context = Shoulda::Context.new("name", self) do
-      setup    do; "setup";    end
-      teardown do; "teardown"; end
-    end
-
-    assert_equal "setup",    context.setup_blocks.first.call
-    assert_equal "teardown", context.teardown_blocks.first.call
-  end
-
-  # building
-
-  def test_should_create_shoulda_test_for_each_should_on_build
-    context = Shoulda::Context.new("name", self) do
-      should "one" do; end
-      should "two" do; end
-    end
-    context.expects(:create_test_from_should_hash).with(has_entry(:name => "one"))
-    context.expects(:create_test_from_should_hash).with(has_entry(:name => "two"))
-    context.build
-  end
-
-  def test_should_create_test_methods_on_build
-    tu_class = ActiveSupport::TestCase
-    context = Shoulda::Context.new("A Context", tu_class) do
-      should "define the test" do; end
-    end
-
-    tu_class.expects(:define_method).with(:"test: A Context should define the test. ")
-    context.build
-  end
-
-  def test_should_create_test_methods_on_build_when_subcontext
-    tu_class = ActiveSupport::TestCase
-    context = Shoulda::Context.new("A Context", tu_class) do
-      context "with a child" do
-        should "define the test" do; end
-      end
-    end
-
-    tu_class.expects(:define_method).with(:"test: A Context with a child should define the test. ")
-    context.build
-  end
-
-  # Test::Unit integration
-
-  def test_should_create_a_new_context_and_build_it_on_Test_Unit_context
-    c = mock("context")
-    c.expects(:build)
-    Shoulda::Context.expects(:new).with("foo", kind_of(Class)).returns(c)
-    self.class.context "foo" do; end
-  end
-
-  def test_should_create_a_one_off_context_and_build_it_on_Test_Unit_should
-    s = mock("test")
-    Shoulda::Context.any_instance.expects(:should).with("rock", {}).returns(s)
-    Shoulda::Context.any_instance.expects(:build)
-    self.class.should "rock" do; end
-  end
-
-  def test_should_create_a_one_off_context_and_build_it_on_Test_Unit_should_eventually
-    s = mock("test")
-    Shoulda::Context.any_instance.expects(:should_eventually).with("rock").returns(s)
-    Shoulda::Context.any_instance.expects(:build)
-    self.class.should_eventually "rock" do; end
-  end
-
-  should "run a :before proc", :before => lambda { @value = "before" } do
-    assert_equal "before", @value
-  end
-
-  context "A :before proc" do
-    setup do
-      assert_equal "before", @value
-      @value = "setup"
-    end
-
-    should "run before the current setup", :before => lambda { @value = "before" } do
-      assert_equal "setup", @value
-    end
-  end
-
-  context "a before statement" do
-    setup do
-      assert_equal "before", @value
-      @value = "setup"
-    end
-
-    before_should "run before the current setup" do
-      @value = "before"
-    end
-  end
-
-  context "A context" do
-    setup do
-      @value = "outer"
-    end
-
-    context "with a subcontext and a :before proc" do
-      before = lambda do
-        assert "outer", @value
-        @value = "before"
-      end
-      should "run after the parent setup", :before => before do
-        assert_equal "before", @value
-      end
-    end
-  end
-
-end