email_spec 1.2.1 → 1.4.0

data/examples/sinatra_root/features/support/env.rb

@@ -1,21 +0,0 @@
-# Generated by cucumber-sinatra. (Tue Jul 27 10:45:23 -0400 2010)
-
-require File.join(File.dirname(__FILE__), '..', '..', 'lib/example_sinatra_app.rb')
-require 'capybara'
-require 'capybara/cucumber'
-require 'rspec/core'
-#require 'activesupport'
-require File.expand_path(File.dirname(__FILE__) + '../../../../../lib/email_spec')
-require 'email_spec/cucumber'
-
-ExampleSinatraApp.set(:environment, :test)
-
-Capybara.app = ExampleSinatraApp
-
-class ExampleSinatraAppWorld
-  include Capybara
-end
-
-World do
-  ExampleSinatraAppWorld.new
-end

data/examples/sinatra_root/features/support/paths.rb

@@ -1,29 +0,0 @@
-# Taken from the cucumber-rails project.
-
-module NavigationHelpers
-  # Maps a name to a path. Used by the
-  #
-  #   When /^I go to (.+)$/ do |page_name|
-  #
-  # step definition in web_steps.rb
-  #
-  def path_to(page_name)
-    case page_name
-
-    when /the home\s?page/
-      '/'
-
-    # Add more mappings here.
-    # Here is an example that pulls values out of the Regexp:
-    #
-    #   when /^(.*)'s profile page$/i
-    #     user_profile_path(User.find_by_login($1))
-
-    else
-      raise "Can't find mapping from \"#{page_name}\" to a path.\n" +
-        "Now, go and add a mapping in #{__FILE__}"
-    end
-  end
-end
-
-World(NavigationHelpers)

data/examples/sinatra_root/lib/example_sinatra_app.rb

@@ -1,45 +0,0 @@
-require 'sinatra/base'
-require 'pony'
-
-class ExampleSinatraApp < Sinatra::Base
-  get '/' do
-    <<-EOHTML
-  <form method="post" action="/signup">
-      <label for="Name">Name</label>
-      <input type="text" id="Name" name="user[name]">
-      <label for="Email">Email</label>
-      <input type="text" id="Email" name="user[email]">
-      <input type="submit" value="Sign up">
-  </form>
-    EOHTML
-  end
-
-  post '/signup' do
-    user = params[:user]
-    body = <<-EOTEXT
-  Hello #{user['name']}!
-
-  Copy and paste this URL into your browser to confirm your account!
-
-  http://www.example.com/confirm
-  This is the text part.
-    EOTEXT
-    html_body = <<-EOHTML
-  Hello #{user['name']}!
-
-  <a href="http://www.example.com/confirm">Click here to confirm your account!</a>
-  This is the HTML part.
-    EOHTML
-    Pony.mail(:from => 'admin@example.com',
-              :to => user['email'],
-              :subject => 'Account confirmation',
-              :body => body,
-              :html_body => html_body
-             )
-             'Thanks!  Go check your email!'
-  end
-
-  get '/confirm' do
-    'Confirm your new account!'
-  end
-end

data/spec/email_spec/helpers_spec.rb

@@ -1,220 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-describe EmailSpec::Helpers do
-  include EmailSpec::Helpers
-  describe "#parse_email_for_link" do
-    it "properly finds links with text" do
-      email = Mail.new(:body =>  %(<a href="/path/to/page">Click Here</a>))
-      parse_email_for_link(email, "Click Here").should == "/path/to/page"
-    end
-
-    it "recognizes img alt properties as text" do
-      email = Mail.new(:body => %(<a href="/path/to/page"><img src="http://host.com/images/image.gif" alt="an image" /></a>))
-      parse_email_for_link(email, "an image").should == "/path/to/page"
-    end
-
-    it "causes a spec to fail if the body doesn't contain the text specified to click" do
-      email = Mail.new(:body => "")
-      lambda { parse_email_for_link(email, "non-existent text") }.should raise_error(  RSpec::Expectations::ExpectationNotMetError)
-    end
-  end
-
-  describe "#set_current_email" do
-    it "should cope with a nil email" do
-      lambda do
-        out = set_current_email(nil)
-        out.should be_nil
-        email_spec_hash[:current_email].should be_nil
-      end.should_not raise_error
-    end
-
-    it "should cope with a real email" do
-      email = Mail.new
-      lambda do
-        out = set_current_email(email)
-        out.should == email
-        email_spec_hash[:current_email].should == email
-      end.should_not raise_error
-    end
-
-    shared_examples_for 'something that sets the current email for recipients' do
-      before do
-        @email = Mail.new(@recipient_type => 'dave@example.com')
-      end
-
-      it "should record that the email has been read for that recipient" do
-        set_current_email(@email)
-        email_spec_hash[:read_emails]['dave@example.com'].should include(@email)
-      end
-
-      it "should record that the email has been read for all the recipient of that type" do
-        @email.send(@recipient_type) << 'dave_2@example.com'
-        set_current_email(@email)
-        email_spec_hash[:read_emails]['dave@example.com'].should include(@email)
-        email_spec_hash[:read_emails]['dave_2@example.com'].should include(@email)
-      end
-
-      it "should record that the email is the current email for the recipient" do
-        set_current_email(@email)
-        email_spec_hash[:current_emails]['dave@example.com'].should == @email
-      end
-
-      it "should record that the email is the current email for all the recipients of that type" do
-        @email.send(@recipient_type) << 'dave_2@example.com'
-        set_current_email(@email)
-        email_spec_hash[:current_emails]['dave@example.com'].should == @email
-        email_spec_hash[:current_emails]['dave_2@example.com'].should == @email
-      end
-
-      it "should overwrite current email for the recipient with this one" do
-        other_mail = Mail.new
-        email_spec_hash[:current_emails]['dave@example.com'] = other_mail
-        set_current_email(@email)
-        email_spec_hash[:current_emails]['dave@example.com'].should == @email
-      end
-
-      it "should overwrite the current email for all the recipients of that type" do
-        other_mail = Mail.new
-        email_spec_hash[:current_emails]['dave@example.com'] = other_mail
-        email_spec_hash[:current_emails]['dave_2@example.com'] = other_mail
-        @email.send(@recipient_type) << 'dave_2@example.com'
-        set_current_email(@email)
-        email_spec_hash[:current_emails]['dave@example.com'].should == @email
-        email_spec_hash[:current_emails]['dave_2@example.com'].should == @email
-      end
-
-      it "should not complain when the email has recipients of that type" do
-        @email.send(:"#{@recipient_type}=", nil)
-        lambda { set_current_email(@email) }.should_not raise_error
-      end
-    end
-
-    describe "#request_uri(link)" do
-      context "without query and anchor" do
-        it "returns the path" do
-          request_uri('http://www.path.se/to/page').should == '/to/page'
-        end
-      end
-
-      context "with query and anchor" do
-        it "returns the path and query and the anchor" do
-          request_uri('http://www.path.se/to/page?q=adam#task').should == '/to/page?q=adam#task'
-        end
-      end
-
-      context "with anchor" do
-        it "returns the path and query and the anchor" do
-          request_uri('http://www.path.se/to/page#task').should == '/to/page#task'
-        end
-      end
-    end
-
-    describe 'for mails with recipients in the to address' do
-      before do
-        @recipient_type = :to
-      end
-
-      it_should_behave_like 'something that sets the current email for recipients'
-    end
-
-    describe 'for mails with recipients in the cc address' do
-      before do
-        @recipient_type = :cc
-      end
-
-      it_should_behave_like 'something that sets the current email for recipients'
-    end
-
-    describe 'for mails with recipients in the bcc address' do
-      before do
-        @recipient_type = :bcc
-      end
-
-      it_should_behave_like 'something that sets the current email for recipients'
-    end
-  end
-
-  describe '#open_email' do
-    describe 'with subject' do
-      shared_examples_for 'something that opens the email with subject' do
-        before do
-          @to = "jimmy_bean@yahoo.com"
-          @email = Mail::Message.new(:to => @to, :subject => @subject)
-          stub!(:mailbox_for).with(@to).and_return([@email])
-        end
-
-        it "should open the email with subject" do
-          open_email(@to, :with_subject => @expected).should == @email
-        end
-      end
-
-      describe 'simple string subject' do
-        before do
-          @subject  = 'This is a simple subject'
-          @expected = 'a simple'
-        end
-
-        it_should_behave_like 'something that opens the email with subject'
-      end
-
-      describe 'string with regex sensitive characters' do
-        before do
-          @subject  = '[app name] Contains regex characters?'
-          @expected = 'regex characters?'
-        end
-
-        it_should_behave_like 'something that opens the email with subject'
-      end
-
-      describe 'regular expression' do
-        before do
-          @subject = "This is a simple subject"
-          @expected = /a simple/
-        end
-
-        it_should_behave_like 'something that opens the email with subject'
-      end
-    end
-
-    describe 'with text' do
-      shared_examples_for 'something that opens the email with text' do
-        before do
-          @to = "jimmy_bean@yahoo.com"
-          @email = Mail::Message.new(:to => @to, :body => @body)
-          stub!(:mailbox_for).with(@to).and_return([@email])
-        end
-
-        it "should open the email with text" do
-          open_email(@to, :with_text => @text).should == @email
-        end
-      end
-
-      describe 'simple string text' do
-        before do
-          @body = 'This is an email body that is very simple'
-          @text = 'email body'
-        end
-
-        it_should_behave_like 'something that opens the email with text'
-      end
-
-      describe 'string with regex sensitive characters' do
-        before do
-          @body = 'This is an email body. It contains some [regex] characters?'
-          @text = '[regex] characters?'
-        end
-
-        it_should_behave_like 'something that opens the email with text'
-      end
-
-      describe 'regular expression' do
-        before do
-          @body = 'This is an email body.'
-          @text = /an\ email/
-        end
-
-        it_should_behave_like 'something that opens the email with text'
-      end
-    end
-  end
-end

data/spec/email_spec/mail_ext_spec.rb

@@ -1,34 +0,0 @@
-require 'spec_helper'
-
-describe EmailSpec::MailExt do
-  describe "#default_part" do
-    it "prefers html_part over text_part" do
-      email = Mail.new do
-        text_part { body "This is text" }
-        html_part { body "This is html" }
-      end
-
-      email.default_part.body.to_s.should == "This is html"
-    end
-
-    it "returns text_part if html_part not available" do
-      email = Mail.new do
-        text_part { body "This is text" }
-      end
-
-      email.default_part.body.to_s.should == "This is text"
-    end
-
-    it "returns the email if not multi-part" do
-      email = Mail.new { body "This is the body" }
-      email.default_part.body.to_s.should == "This is the body"
-    end
-  end
-
-  describe "#default_part_body" do
-    it "returns default_part.body" do
-      email = Mail.new(:body => "hi")
-      email.default_part.body.should == email.default_part_body
-    end
-  end
-end

data/spec/email_spec/matchers_spec.rb

@@ -1,486 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-describe EmailSpec::Matchers do
-  include EmailSpec::Matchers
-
-  class MatcherMatch
-    def initialize(object_to_test_match)
-      @object_to_test_match = object_to_test_match
-    end
-
-    def description
-      "match when provided #{@object_to_test_match.inspect}"
-    end
-
-    def matches?(matcher)
-      @matcher = matcher
-      matcher.matches?(@object_to_test_match)
-    end
-
-    def failure_message
-      "expected #{@matcher.inspect} to match when provided #{@object_to_test_match.inspect}, but it did not"
-    end
-
-    def negative_failure_message
-      "expected #{@matcher.inspect} not to match when provided #{@object_to_test_match.inspect}, but it did"
-    end
-  end
-
-  def match(object_to_test_match)
-    if object_to_test_match.is_a?(Regexp)
-      super # delegate to rspec's built in 'match' matcher
-    else
-      MatcherMatch.new(object_to_test_match)
-    end
-  end
-
-  describe "#reply_to" do
-    it "should match when the email is set to deliver to the specified address" do
-      email = Mail::Message.new(:reply_to => ["test@gmail.com"])
-      reply_to("test@gmail.com").should match(email)
-    end
-
-    it "should match given a name and address" do
-      email = Mail::Message.new(:reply_to => ["test@gmail.com"])
-      reply_to("David Balatero <test@gmail.com>").should match(email)
-    end
-
-    it "should give correct failure message when the email is not set to deliver to the specified address" do
-      matcher = reply_to("jimmy_bean@yahoo.com")
-      matcher.matches?(Mail::Message.new(:reply_to => ['freddy_noe@yahoo.com']).with_inspect_stub)
-      matcher.failure_message.should == %{expected email to reply to "jimmy_bean@yahoo.com", but it replied to "freddy_noe@yahoo.com"}
-    end
-
-  end
-
-  describe "#deliver_to" do
-    it "should match when the email is set to deliver to the specified address" do
-      email = Mail::Message.new(:to => "jimmy_bean@yahoo.com")
-
-      deliver_to("jimmy_bean@yahoo.com").should match(email)
-    end
-
-    it "should match when the email is set to deliver to the specified name and address" do
-      email = Mail::Message.new(:to => "Jimmy Bean <jimmy_bean@yahoo.com>")
-      deliver_to("Jimmy Bean <jimmy_bean@yahoo.com>").should match(email)
-    end
-
-    it "should match when a list of emails is exact same as all of the email's recipients" do
-      email = Mail::Message.new(:to => ["james@yahoo.com", "karen@yahoo.com"])
-
-      deliver_to("karen@yahoo.com", "james@yahoo.com").should match(email)
-      deliver_to("karen@yahoo.com").should_not match(email)
-    end
-
-    it "should match when an array of emails is exact same as all of the email's recipients" do
-      addresses = ["james@yahoo.com", "karen@yahoo.com"]
-      email = Mail::Message.new(:to => addresses)
-      deliver_to(addresses).should match(email)
-    end
-    
-    it "should match when the names and email addresses match in any order" do
-      addresses = ["James <james@yahoo.com>", "Karen <karen@yahoo.com>"]
-      email = Mail::Message.new(:to => addresses.reverse)
-      deliver_to(addresses).should match(email)
-    end
-
-    it "should use the passed in objects :email method if not a string" do
-      email = Mail::Message.new(:to => "jimmy_bean@yahoo.com")
-      user = mock("user", :email => "jimmy_bean@yahoo.com")
-
-      deliver_to(user).should match(email)
-    end
-
-    it "should not match when the email does not have a recipient" do
-      email = Mail::Message.new(:to => nil)
-      deliver_to("jimmy_bean@yahoo.com").should_not match(email)
-    end
-
-    it "should not match when the email addresses match but the names do not" do
-      email = Mail::Message.new(:to => "Jimmy Bean <jimmy_bean@yahoo.com>")
-      deliver_to("Freddy Noe <jimmy_bean@yahoo.com>").should_not match(email)
-    end
-
-    it "should not match when the names match but the email addresses do not" do
-      email = Mail::Message.new(:to => "Jimmy Bean <jimmy_bean@yahoo.com>")
-      deliver_to("Jimmy Bean <freddy_noe@yahoo.com>").should_not match(email)
-    end
-
-    it "should give correct failure message when the email is not set to deliver to the specified address" do
-      matcher = deliver_to("jimmy_bean@yahoo.com")
-      message = Mail::Message.new(:to => 'freddy_noe@yahoo.com')
-      message.stub(:inspect).and_return("email")
-      matcher.matches?(message)
-      matcher.failure_message.should == %{expected email to deliver to ["jimmy_bean@yahoo.com"], but it delivered to ["freddy_noe@yahoo.com"]}
-    end
-
-  end
-
-  describe "#deliver_from" do
-    it "should match when the email is set to deliver from the specified address" do
-      email = Mail::Message.new(:from => "jimmy_bean@yahoo.com")
-      deliver_from("jimmy_bean@yahoo.com").should match(email)
-    end
-
-    it "should match when the email is set to deliver from the specified name and address" do
-      email = Mail::Message.new(:from => "Jimmy Bean <jimmy_bean@yahoo.com>")
-      deliver_from("Jimmy Bean <jimmy_bean@yahoo.com>").should match(email)
-    end
-
-    it "should not match when the email does not have a sender" do
-      email = Mail::Message.new(:from => nil)
-      deliver_from("jimmy_bean@yahoo.com").should_not match(email)
-    end
-
-    it "should not match when the email addresses match but the names do not" do
-      email = Mail::Message.new(:from => "Jimmy Bean <jimmy_bean@yahoo.com>")
-      deliver_from("Freddy Noe <jimmy_bean@yahoo.com>").should_not match(email)
-    end
-
-    it "should not match when the names match but the email addresses do not" do
-      email = Mail::Message.new(:from => "Jimmy Bean <jimmy_bean@yahoo.com>")
-      deliver_from("Jimmy Bean <freddy_noe@yahoo.com>").should_not match(email)
-    end
-
-    it "should not match when the email is not set to deliver from the specified address" do
-      email = Mail::Message.new(:from => "freddy_noe@yahoo.com")
-      deliver_from("jimmy_bean@yahoo.com").should_not match(email)
-    end
-
-    it "should give correct failure message when the email is not set to deliver from the specified address" do
-      matcher = deliver_from("jimmy_bean@yahoo.com")
-      matcher.matches?(Mail::Message.new(:from => "freddy_noe@yahoo.com"))
-      matcher.failure_message.should =~ /expected .+ to deliver from "jimmy_bean@yahoo\.com", but it delivered from "freddy_noe@yahoo\.com"/
-    end
-
-  end
-
-  describe "#bcc_to" do
-
-    it "should match when the email is set to deliver to the specidied address" do
-      email = Mail::Message.new(:bcc => "jimmy_bean@yahoo.com")
-
-      bcc_to("jimmy_bean@yahoo.com").should match(email)
-    end
-
-    it "should match when a list of emails is exact same as all of the email's recipients" do
-      email = Mail::Message.new(:bcc => ["james@yahoo.com", "karen@yahoo.com"])
-
-      bcc_to("karen@yahoo.com", "james@yahoo.com").should match(email)
-      bcc_to("karen@yahoo.com").should_not match(email)
-    end
-
-    it "should match when an array of emails is exact same as all of the email's recipients" do
-      addresses = ["james@yahoo.com", "karen@yahoo.com"]
-      email = Mail::Message.new(:bcc => addresses)
-      bcc_to(addresses).should match(email)
-    end
-
-    it "should use the passed in objects :email method if not a string" do
-      email = Mail::Message.new(:bcc => "jimmy_bean@yahoo.com")
-      user = mock("user", :email => "jimmy_bean@yahoo.com")
-
-      bcc_to(user).should match(email)
-    end
-
-  end
-
-  describe "#cc_to" do
-
-    it "should match when the email is set to deliver to the specified address" do
-      email = Mail::Message.new(:cc => "jimmy_bean@yahoo.com")
-
-      cc_to("jimmy_bean@yahoo.com").should match(email)
-    end
-
-    it "should match when a list of emails is exact same as all of the email's recipients" do
-      email = Mail::Message.new(:cc => ["james@yahoo.com", "karen@yahoo.com"])
-
-      cc_to("karen@yahoo.com", "james@yahoo.com").should match(email)
-      cc_to("karen@yahoo.com").should_not match(email)
-    end
-
-    it "should match when an array of emails is exact same as all of the email's recipients" do
-      addresses = ["james@yahoo.com", "karen@yahoo.com"]
-      email = Mail::Message.new(:cc => addresses)
-      cc_to(addresses).should match(email)
-    end
-
-    it "should use the passed in objects :email method if not a string" do
-      email = Mail::Message.new(:cc => "jimmy_bean@yahoo.com")
-      user = mock("user", :email => "jimmy_bean@yahoo.com")
-
-      cc_to(user).should match(email)
-    end
-
-  end
-
-  describe "#have_subject" do
-
-    describe "when regexps are used" do
-
-      it "should match when the subject matches regexp" do
-        email = Mail::Message.new(:subject => ' -- The Subject --')
-
-        have_subject(/The Subject/).should match(email)
-        have_subject(/foo/).should_not match(email)
-      end
-
-      it "should have a helpful description" do
-        matcher = have_subject(/foo/)
-        matcher.matches?(Mail::Message.new(:subject => "bar"))
-
-        matcher.description.should == "have subject matching /foo/"
-      end
-
-      it "should offer helpful failing messages" do
-        matcher = have_subject(/foo/)
-        matcher.matches?(Mail::Message.new(:subject => "bar"))
-
-        matcher.failure_message.should == 'expected the subject to match /foo/, but did not.  Actual subject was: "bar"'
-      end
-
-      it "should offer helpful negative failing messages" do
-        matcher = have_subject(/b/)
-        matcher.matches?(Mail::Message.new(:subject => "bar"))
-
-        matcher.negative_failure_message.should == 'expected the subject not to match /b/ but "bar" does match it.'
-      end
-    end
-
-    describe "when strings are used" do
-      it "should match when the subject equals the passed in string exactly" do
-        email = Mail::Message.new(:subject => 'foo')
-
-        have_subject("foo").should match(email)
-        have_subject(" - foo -").should_not match(email)
-      end
-
-      it "should have a helpful description" do
-        matcher = have_subject("foo")
-        matcher.matches?(Mail::Message.new(:subject => "bar"))
-
-        matcher.description.should == 'have subject of "foo"'
-      end
-
-      it "should offer helpful failing messages" do
-        matcher = have_subject("foo")
-        matcher.matches?(Mail::Message.new(:subject => "bar"))
-
-        matcher.failure_message.should == 'expected the subject to be "foo" but was "bar"'
-      end
-
-      it "should offer helpful negative failing messages" do
-        matcher = have_subject("bar")
-        matcher.matches?(Mail::Message.new(:subject => "bar"))
-
-        matcher.negative_failure_message.should == 'expected the subject not to be "bar" but was'
-      end
-    end
-  end
-
-  describe "#include_email_with_subject" do
-    
-    describe "when regexps are used" do
-      
-      it "should match when any email's subject matches passed in regexp" do
-        emails = [Mail::Message.new(:subject => "foobar"), Mail::Message.new(:subject => "bazqux")]
-        
-        include_email_with_subject(/foo/).should match(emails)
-        include_email_with_subject(/quux/).should_not match(emails)
-      end
-
-      it "should have a helpful description" do
-        matcher = include_email_with_subject(/foo/)
-        matcher.matches?([])
-        
-        matcher.description.should == 'include email with subject matching /foo/'
-      end
-
-      it "should offer helpful failing messages" do
-        matcher = include_email_with_subject(/foo/)
-        matcher.matches?([Mail::Message.new(:subject => "bar")])
-        
-        matcher.failure_message.should == 'expected at least one email to have a subject matching /foo/, but none did. Subjects were ["bar"]'
-      end
-
-      it "should offer helpful negative failing messages" do
-        matcher = include_email_with_subject(/foo/)
-        matcher.matches?([Mail::Message.new(:subject => "foo")])
-        
-        matcher.negative_failure_message.should == 'expected no email to have a subject matching /foo/ but found at least one. Subjects were ["foo"]'
-      end
-    end
-    
-    describe "when strings are used" do
-      it "should match when any email's subject equals passed in subject exactly" do
-        emails = [Mail::Message.new(:subject => "foobar"), Mail::Message.new(:subject => "bazqux")]
-        
-        include_email_with_subject("foobar").should match(emails)
-        include_email_with_subject("foo").should_not match(emails)
-      end
-      
-      it "should have a helpful description" do
-        matcher = include_email_with_subject("foo")
-        matcher.matches?([])
-        
-        matcher.description.should == 'include email with subject of "foo"'
-      end
-      
-      it "should offer helpful failing messages" do
-        matcher = include_email_with_subject("foo")
-        matcher.matches?([Mail::Message.new(:subject => "bar")])
-        
-        matcher.failure_message.should == 'expected at least one email to have the subject "foo" but none did. Subjects were ["bar"]'
-      end
-      
-      it "should offer helpful negative failing messages" do
-        matcher = include_email_with_subject("foo")
-        matcher.matches?([Mail::Message.new(:subject => "foo")])
-        
-        matcher.negative_failure_message.should == 'expected no email with the subject "foo" but found at least one. Subjects were ["foo"]'
-      end
-    end
-  end
-
-  describe "#have_body_text" do
-    describe "when regexps are used" do
-      it "should match when the body matches regexp" do
-        email = Mail::Message.new(:body => 'foo bar baz')
-
-        have_body_text(/bar/).should match(email)
-        have_body_text(/qux/).should_not match(email)
-      end
-
-      it "should have a helpful description" do
-        matcher = have_body_text(/qux/)
-        matcher.matches?(Mail::Message.new(:body => 'foo bar baz'))
-        
-        matcher.description.should == 'have body matching /qux/'
-      end
-
-      it "should offer helpful failing messages" do
-        matcher = have_body_text(/qux/)
-        matcher.matches?(Mail::Message.new(:body => 'foo bar baz'))
-        
-        matcher.failure_message.should == 'expected the body to match /qux/, but did not.  Actual body was: "foo bar baz"'
-      end
-
-      it "should offer helpful negative failing messages" do
-        matcher = have_body_text(/bar/)
-        matcher.matches?(Mail::Message.new(:body => 'foo bar baz'))
-
-        matcher.negative_failure_message.should == 'expected the body not to match /bar/ but "foo bar baz" does match it.'
-      end
-    end
-    
-    describe "when strings are used" do
-      it "should match when the body includes the text" do
-        email = Mail::Message.new(:body => 'foo bar baz')
-        
-        have_body_text('bar').should match(email)
-        have_body_text('qux').should_not match(email)
-      end
-      
-      it "should have a helpful description" do
-        matcher = have_body_text('qux')
-        matcher.matches?(Mail::Message.new(:body => 'foo bar baz'))
-        
-        matcher.description.should == 'have body including "qux"'
-      end
-      
-      it "should offer helpful failing messages" do
-        matcher = have_body_text('qux')
-        matcher.matches?(Mail::Message.new(:body => 'foo bar baz'))
-        
-        matcher.failure_message.should == 'expected the body to contain "qux" but was "foo bar baz"'
-      end
-      
-      it "should offer helpful negative failing messages" do
-        matcher = have_body_text('bar')
-        matcher.matches?(Mail::Message.new(:body => 'foo bar baz'))
-        
-        matcher.negative_failure_message.should == 'expected the body not to contain "bar" but was "foo bar baz"'
-      end
-    end
-
-    describe "when dealing with multipart messages" do
-      it "should look at the html part" do
-        email = Mail.new do
-          text_part do
-            body "This is text"
-          end
-          html_part do
-            body "This is html"
-          end
-        end
-        have_body_text(/This is html/).should match(email)
-        have_body_text(/This is text/).should_not match(email)
-      end
-    end
-  end
-
-  describe "#have_header" do
-    describe "when regexps are used" do
-      it "should match when header matches passed in regexp" do
-        email = Mail::Message.new(:content_type => "text/html")
-        
-        have_header(:content_type, /text/).should match(email)
-        have_header(:foo, /text/).should_not match(email)
-        have_header(:content_type, /bar/).should_not match(email)
-      end
-
-      it "should have a helpful description" do
-        matcher = have_header(:content_type, /bar/)
-        matcher.matches?(Mail::Message.new(:content_type => "text/html"))
-        
-        matcher.description.should == 'have header content_type with value matching /bar/'
-      end
-
-      it "should offer helpful failing messages" do
-        matcher = have_header(:content_type, /bar/)
-        matcher.matches?(Mail::Message.new(:content_type => "text/html"))
-        
-        matcher.failure_message.should == 'expected the headers to include \'content_type\' with a value matching /bar/ but they were {"content-type"=>"text/html"}'
-      end
-
-      it "should offer helpful negative failing messages" do
-        matcher = have_header(:content_type, /text/)
-        matcher.matches?(Mail::Message.new(:content_type => "text/html"))
-        
-        matcher.negative_failure_message.should == 'expected the headers not to include \'content_type\' with a value matching /text/ but they were {"content-type"=>"text/html"}'
-      end
-    end
-    
-    describe "when strings are used" do
-      it "should match when header equals passed in value exactly" do
-        email = Mail::Message.new(:content_type => "text/html")
-        
-        have_header(:content_type, 'text/html').should match(email)
-        have_header(:foo, 'text/html').should_not match(email)
-        have_header(:content_type, 'text').should_not match(email)
-      end
-      
-      it "should have a helpful description" do
-        matcher = have_header(:content_type, 'text')
-        matcher.matches?(Mail::Message.new(:content_type => "text/html"))
-        
-        matcher.description.should == 'have header content_type: text'
-      end
-      
-      it "should offer helpful failing messages" do
-        matcher = have_header(:content_type, 'text')
-        matcher.matches?(Mail::Message.new(:content_type => "text/html"))
-        
-        matcher.failure_message.should == 'expected the headers to include \'content_type: text\' but they were {"content-type"=>"text/html"}'
-      end
-      
-      it "should offer helpful negative failing messages" do
-        matcher = have_header(:content_type, 'text/html')
-        matcher.matches?(Mail::Message.new(:content_type => "text/html"))
-        
-        matcher.negative_failure_message == 'expected the headers not to include \'content_type: text/html\' but they were {:content_type=>"text/html"}'
-      end
-    end
-  end
-end