radiant-mailer-extension 1.0.0

data/spec/lib/mailer_tags_spec.rb

@@ -0,0 +1,326 @@
+require File.dirname(__FILE__) + "/../spec_helper"
+
+describe "MailerTags" do
+  dataset :mailer
+  describe "<r:mailer>" do
+    it "should render an error if the configuration is invalid" do
+       pages(:home).should render("<r:mailer>true</r:mailer>").as('Mailer config is not valid (see Mailer.valid_config?)')
+    end
+
+    it "should render its contents if the configuration is valid" do
+      pages(:mail_form).should render("<r:mailer>true</r:mailer>").as('true')
+    end
+  end
+
+  describe "<r:mailer:if_error>" do
+    before :each do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'body' => 'Hello, world!')
+    end
+
+    it "should render its contents if there was an error in the last posted mail" do
+      @mail.should_receive(:valid?).and_return(false)
+      @page.should render('<r:mailer:if_error>Oops.</r:mailer:if_error>').as('Oops.')
+    end
+
+    it "should not render its contents if the last posted mail was valid" do
+      @mail.should_receive(:valid?).and_return(true)
+      @page.should render('<r:mailer:if_error>Oops.</r:mailer:if_error>').as('')
+    end
+
+    describe "when a field is specified" do
+      it "should render its contents if there was an error on the specified field in the last posted mail" do
+        @mail.errors['email'] = "is not a valid email"
+        @page.should render('<r:mailer:if_error on="email">true</r:mailer:if_error>').as('true')
+      end
+
+      it "should not render its contents if there wasn't an error on the specified field in the last posted mail" do
+        @mail.errors['email'] = "is not a valid email"
+        @page.should render('<r:mailer:if_error on="name">true</r:mailer:if_error>').as('')
+      end
+    end
+  end
+
+  describe "<r:mailer:if_error:message>" do
+    before :each do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'body' => 'Hello, world!')
+    end
+
+    it "should render the error message on the specified attribute" do
+      @mail.errors['email'] = 'is not a valid email'
+      @page.should render('<r:mailer:if_error on="email"><r:message /></r:mailer:if_error>').as("is not a valid email")
+    end
+  end
+
+  describe "<r:mailer:unless_error>" do
+    before :each do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'body' => 'Hello, world!')
+    end
+
+    it "should render its contents if there was not error in the last posted mail" do
+      @mail.should_receive(:valid?).and_return(true)
+      @page.should render('<r:mailer:unless_error>Oops.</r:mailer:unless_error>').as('Oops.')
+    end
+
+    it "should render its contents if the last posted mail was valid" do
+      @mail.should_receive(:valid?).and_return(false)
+      @page.should render('<r:mailer:unless_error>Oops.</r:mailer:unless_error>').as('')
+    end
+
+    describe "when a field is specified" do
+      it "should not render its contents if there was an error on the specified field in the last posted mail" do
+        @mail.errors['email'] = "is not a valid email"
+        @page.should render('<r:mailer:unless_error on="email">true</r:mailer:unless_error>').as('')
+      end
+
+      it "should render its contents if there wasn't an error on the specified field in the last posted mail" do
+        @mail.errors['email'] = "is not a valid email"
+        @page.should render('<r:mailer:unless_error on="name">true</r:mailer:unless_error>').as('true')
+      end
+    end
+  end
+
+  describe "<r:mailer:form>" do
+    it "should render a form that posts back to the page when mailer.post_to_page? is true" do
+      Radiant::Config['mailer.post_to_page?'] = true
+      pages(:mail_form).should render('<r:mailer:form />').as('<form action="/mail-form/" method="post" id="mailer"></form>')
+    end
+
+    it "should render a form that posts back to the controller when mailer.post_to_page? is false" do
+      Radiant::Config['mailer.post_to_page?'] = false
+      pages(:mail_form).should render('<r:mailer:form />').as(%Q{<form action="/pages/#{page_id(:mail_form)}/mail#mailer" method="post" id="mailer"></form>})
+    end
+
+    it "should render permitted passed attributes as attributes of the form tag" do
+      pages(:mail_form).should render('<r:mailer:form class="foo" />').matching(/class="foo"/)
+    end
+  end
+
+  describe "<r:mailer:if_success>" do
+    before :each do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'body' => 'Hello, world!')
+    end
+
+    it "should render its contents if the last posted mail was sent successfully" do
+      @mail.should_receive(:sent?).and_return(true)
+      @page.should render('<r:mailer:if_success>true</r:mailer:if_success>').as('true')
+    end
+
+    it "should not render its contents if the last posted mail was not sent successfully" do
+      @mail.should_receive(:sent?).and_return(false)
+      @page.should render('<r:mailer:if_success>true</r:mailer:if_success>').as('')
+    end
+  end
+
+  %w(text checkbox radio hidden).each do |type|
+    describe "<r:mailer:#{type}>" do
+      it "should render an input tag with the type #{type}" do
+        pages(:mail_form).should render("<r:mailer:#{type} name='foo' />").as(%Q{<input type="#{type}" value="" id="foo" name="mailer[foo]" />})
+      end
+
+      it "should render permitted passed attributes as attributes of the input tag" do
+        pages(:mail_form).should render("<r:mailer:#{type} name='foo' class='bar'/>").as(%Q{<input type="#{type}" value="" class="bar" id="foo" name="mailer[foo]" />})
+      end
+
+      it "should render the specified value as the value attribute" do
+        pages(:mail_form).should render("<r:mailer:#{type} name='foo' value='bar'/>").as(%Q{<input type="#{type}" value="bar" id="foo" name="mailer[foo]" />})
+      end
+
+      it "should render the previously posted value when present as the value attribute, overriding a passed value attribute" do
+        @page = pages(:mail_form)
+        @page.last_mail = @mail = Mail.new(@page, @page.config, 'foo' => 'Hello, world!')
+        @page.should render("<r:mailer:#{type} name='foo' value='bar'/>").as(%Q{<input type="#{type}" value="Hello, world!" id="foo" name="mailer[foo]" />})
+      end
+
+      it "should add a 'required' hidden field when the required attribute is specified" do
+        pages(:mail_form).should render("<r:mailer:#{type} name='foo' required='true'/>").as(%Q{<input type="#{type}" value="" id="foo" name="mailer[foo]" /><input type="hidden" name="mailer[required][foo]" value="true" />})
+      end
+
+      it "should raise an error if the name attribute is not specified" do
+        pages(:mail_form).should render("<r:mailer:#{type} />").with_error("`mailer:#{type}' tag requires a `name' attribute")
+      end
+    end
+  end
+
+  describe "<r:mailer:select>" do
+    it "should render a select tag" do
+      pages(:mail_form).should render('<r:mailer:select name="foo" />').as('<select size="1" id="foo" name="mailer[foo]"></select>')
+    end
+
+    it "should raise an error if the name attribute is not specified" do
+      pages(:mail_form).should render("<r:mailer:select />").with_error("`mailer:select' tag requires a `name' attribute")
+    end
+
+    it "should render its contents within the select tag" do
+      pages(:mail_form).should render('<r:mailer:select name="foo">bar</r:mailer:select>').as('<select size="1" id="foo" name="mailer[foo]">bar</select>')
+    end
+
+    it "should render nested <r:mailer:option> tags as option tags" do
+      pages(:mail_form).should render('<r:mailer:select name="foo"><r:option value="bar">bar</r:option></r:mailer:select>').as('<select size="1" id="foo" name="mailer[foo]"><option value="bar" >bar</option></select>')
+    end
+
+    it "should select the specified option tag on a new form" do
+      pages(:mail_form).should render('<r:mailer:select name="foo"><r:option value="bar" selected="selected">bar</r:option><r:option value="baz">baz</r:option></r:mailer:select>').as('<select size="1" id="foo" name="mailer[foo]"><option value="bar" selected="selected" >bar</option><option value="baz" >baz</option></select>')
+    end
+
+    it "should select the option tag with previously posted value" do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'foo' => 'baz')
+      @page.should render('<r:mailer:select name="foo"><r:option value="bar" selected="selected">bar</r:option><r:option value="baz">baz</r:option></r:mailer:select>').as('<select size="1" id="foo" name="mailer[foo]"><option value="bar" >bar</option><option value="baz" selected="selected" >baz</option></select>')
+    end
+    
+    it "should add a 'required' hidden field when the required attribute is specified" do
+      pages(:mail_form).should render("<r:mailer:select name='foo' required='true'/>").as(%Q{<select size="1" id="foo" name="mailer[foo]"></select><input type="hidden" name="mailer[required][foo]" value="true" />})
+    end
+  end
+  
+  describe "<r:mailer:date_select>" do
+    # HACK: Quick way to get a tag rendered to string in the context of a page.
+    # How can this be made better?
+    def render_tag_in_mailer(content)
+      tag = Spec::Rails::Matchers::RenderTags.new
+      tag.send(:render_content_with_page, content, pages(:mail_form))
+    end
+    
+    it "should render select tags for each date component" do
+      date_select = render_tag_in_mailer('<r:mailer:date_select name="foo" />')
+      date_select.should have_tag('select[name=?]', "mailer[foo(1i)]")
+      date_select.should have_tag('select[name=?]', "mailer[foo(2i)]")
+      date_select.should have_tag('select[name=?]', "mailer[foo(3i)]")
+    end
+    
+    it "should include blank options" do
+      date_select = render_tag_in_mailer('<r:mailer:date_select name="foo" include_blank="true" />')
+      date_select.should have_tag('select[name=?]', "mailer[foo(1i)]") do
+        with_tag('option[value=?]', '')
+      end
+      date_select.should have_tag('select[name=?]', "mailer[foo(2i)]") do
+        with_tag('option[value=?]', '')
+      end
+      date_select.should have_tag('select[name=?]', "mailer[foo(3i)]") do
+        with_tag('option[value=?]', '')
+      end
+    end
+    
+    it "should order select tags" do
+      date_select = render_tag_in_mailer('<r:mailer:date_select name="foo" order="day,year,month" />')
+      date_select.should have_tag('select[name=?]+select[name=?]+select[name=?]','mailer[foo(3i)]', 'mailer[foo(1i)]', 'mailer[foo(2i)]')
+    end
+  end
+
+  describe "<r:mailer:textarea>" do
+    it "should render a textarea tag" do
+      pages(:mail_form).should render('<r:mailer:textarea name="body" />').as('<textarea id="body" rows="5" cols="35" name="mailer[body]"></textarea>')
+    end
+
+    it "should raise an error if the name attribute is not specified" do
+      pages(:mail_form).should render("<r:mailer:textarea />").with_error("`mailer:textarea' tag requires a `name' attribute")
+    end
+
+    it "should render its contents as the contents of the textarea tag" do
+      pages(:mail_form).should render('<r:mailer:textarea name="body">Hello, world!</r:mailer:textarea>').as('<textarea id="body" rows="5" cols="35" name="mailer[body]">Hello, world!</textarea>')
+    end
+    
+    it "should add a 'required' hidden field when the required attribute is specified" do
+      pages(:mail_form).should render("<r:mailer:textarea name='body' required='true'/>").as(%Q{<textarea id="body" rows="5" cols="35" name="mailer[body]"></textarea><input type="hidden" name="mailer[required][body]" value="true" />})
+    end
+  end
+  
+  describe "<r:mailer:radiogroup>" do
+    it "should render its contents" do
+      pages(:mail_form).should render('<r:mailer:radiogroup name="foo">bar</r:mailer:radiogroup>').as('bar')
+    end
+    
+    it "should raise an error if the name attribute is not specified" do
+      pages(:mail_form).should render("<r:mailer:radiogroup />").with_error("`mailer:radiogroup' tag requires a `name' attribute")
+    end
+    
+    it "should render nested <r:mailer:option> tags as radio buttons" do
+      pages(:mail_form).should render('<r:mailer:radiogroup name="foo"><r:option value="bar" /></r:mailer:radiogroup>').as('<input type="radio" value="bar" id="foo" name="mailer[foo]" />')
+    end
+    
+    it "should select the specified radio button on a new form" do
+      pages(:mail_form).should render('<r:mailer:radiogroup name="foo"><r:option value="bar" selected="selected"/><r:option value="baz" /></r:mailer:radiogroup>').as('<input type="radio" value="bar" checked="checked" id="foo" name="mailer[foo]" /><input type="radio" value="baz" id="foo" name="mailer[foo]" />')
+    end
+    
+    it "should select the radio button with previously posted value" do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'foo' => 'baz')
+      @page.should render('<r:mailer:radiogroup name="foo"><r:option value="bar" selected="selected"/><r:option value="baz" /></r:mailer:radiogroup>').as('<input type="radio" value="bar" id="foo" name="mailer[foo]" /><input type="radio" value="baz" checked="checked" id="foo" name="mailer[foo]" />')
+    end
+  end
+  
+  describe "<r:mailer:get>" do
+    before :each do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'foo' => 'baz')
+    end
+    
+    it "should render the data as YAML when no name is given" do
+      @page.should render('<r:mailer:get />').as("--- \nfoo: baz\n")
+    end
+    
+    it "should render the specified datum" do
+      @page.should render('<r:mailer:get name="foo" />').as('baz')
+    end
+    
+    it "should render nothing when the value is not present" do
+      @page.should render('<r:mailer:get name="body" />').as('')
+    end
+    
+    it "should render date when date params are detected" do
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'foo(1i)' => '2008', 'foo(2i)' => '10', 'foo(3i)' => '29')
+      @page.should render('<r:mailer:get name="foo" />').as('2008-10-29')
+    end
+  end
+  
+  describe "<r:mailer:get_each>" do
+    before :each do
+      # This simulates variables like :
+      #   products[0][qty]=10
+      #   products[0][name]=foo
+      #   products[1][qty]=5
+      #   products[1][name]=bar
+      test_array=[ { 'qty' => 10, 'name' => 'foo' }, 
+                   { 'qty' => 5, 'name' => 'bar' } ]
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'qty' => 'wrong', 'products' => test_array)
+    end
+    
+    it "should not alter the content on its own" do
+      @page.should render('<r:mailer:get_each />').as('')
+    end
+    
+    it "should make mailer:get use the local variables" do
+      # If this fails, it will show "wrongwrong" or something like that
+      @page.should render('<r:mailer:get_each name="products"><r:mailer:get name="qty" /></r:mailer:get_each>').as('105')
+    end
+    
+    it "should iterate and provide mailer:get the local variables" do
+      @page.should render('<r:mailer:get_each name="products"><r:mailer:get name="qty" />x<r:mailer:get name="name" />,</r:mailer:get_each>').as('10xfoo,5xbar,')
+    end
+    
+    it "should provide mailer:index" do
+      @page.should render('<r:mailer:get_each name="products"><r:mailer:index /><r:mailer:get name="name" /></r:mailer:get_each>').as('0foo1bar')
+    end
+    
+  end
+  
+  describe "<r:mailer:if_value>" do
+    before :each do
+      @page = pages(:mail_form)
+      @page.last_mail = @mail = Mail.new(@page, @page.config, 'foo' => 'baz')
+    end
+    
+    it "should render its contained block if the specified value was submitted" do
+      @page.should render('<r:mailer:if_value name="foo">true</r:mailer:if_value>').as('true')
+    end
+
+    it "should render not its contained block if the specified value was not submitted" do
+      @page.should render('<r:mailer:if_value name="bar">true</r:mailer:if_value>').as('')
+    end
+  end
+end

data/spec/models/mail_spec.rb

@@ -0,0 +1,212 @@
+require File.dirname(__FILE__) + "/../spec_helper"
+
+describe Mail do
+  dataset :mailer
+
+  before :each do
+    @page = pages(:mail_form)
+    @page.request = ActionController::TestRequest.new
+    @page.last_mail = @mail = Mail.new(@page, {:recipients => ['foo@bar.com'], :from => 'foo@baz.com'}, {'body' => 'Hello, world!'})
+    ActionMailer::Base.delivery_method = :test
+    ActionMailer::Base.deliveries = []
+  end
+
+  it "should have an invalid config when recipients or from keys are absent" do
+    Mail.valid_config?('from' => 'foo@baz.com').should be_false
+    Mail.valid_config?('recipients' => 'foo@bar.com').should be_false
+  end
+
+  it "should have a valid config when recipients and from keys are present" do
+    Mail.valid_config?('recipients' => 'foo@bar.com', 'from' => 'foo@baz.com').should be_true
+  end
+
+  it "should have a valid config when recipients_field stands in for recipients" do
+    Mail.valid_config?('recipients_field' => 'to', 'from' => 'foo@baz.com').should be_true
+  end
+
+  it "should have a valid config when from_field stands in for from" do
+    Mail.valid_config?('recipients' => 'foo@bar.com', 'from_field' => 'from').should be_true
+  end
+
+  it "should derive the from field from the configuration" do
+    @mail.from.should == 'foo@baz.com'
+  end
+
+  it "should derive the from field from the data when not in the configuration" do
+    @mail.config[:from] = nil
+    @mail.config[:from_field] = 'from'
+    @mail.data['from'] = 'radiant@foo.com'
+    @mail.from.should == 'radiant@foo.com'
+  end
+
+  it "should derive the recipients field from the configuration" do
+    @mail.recipients.should == ['foo@bar.com']
+  end
+
+  it "should derive the recipients field from the data when not in the configuration" do
+    @mail.config[:recipients] = nil
+    @mail.config[:recipients_field] = 'to'
+    @mail.data['to'] = 'radiant@foo.com'
+    @mail.recipients.should == %w(radiant@foo.com)
+  end
+
+  it "should derive the reply_to field from the configuration" do
+    @mail.config[:reply_to] = "sean@radiant.com"
+    @mail.reply_to.should == "sean@radiant.com"
+  end
+
+  it "should derive the reply_to field from the data when not in the configuration" do
+    @mail.config[:reply_to_field] = 'reply_to'
+    @mail.data['reply_to'] = 'sean@radiant.com'
+    @mail.reply_to.should == 'sean@radiant.com'
+  end
+
+  it "should derive the sender field from the configuration" do
+    @mail.config[:sender] = "sean@radiant.com"
+    @mail.sender.should == "sean@radiant.com"
+  end
+
+  it "should derive the subject field from the data" do
+    @mail.data[:subject] = "My subject"
+    @mail.subject.should == 'My subject'
+  end
+
+  it "should derive the subject field from the configuration when not present in the data" do
+    @mail.config[:subject] = "My subject"
+    @mail.subject.should == 'My subject'
+  end
+
+  it "should generate the subject field when not present in data or configuration" do
+    @mail.subject.should == 'Form Mail from test.host'
+  end
+  
+  it "should derive the cc field from the data when configured" do
+    @mail.data['cc'] = "sean@radiant.com"
+    @mail.config[:cc_field] = 'cc'
+    @mail.cc.should == "sean@radiant.com"
+  end
+  
+  it "should derive the cc field from the configuration when not in the data" do
+    @mail.config[:cc] = "sean@radiant.com"
+    @mail.cc.should == "sean@radiant.com"
+  end
+  
+  it "should return a blank cc when not in the data or configuration" do
+    @mail.cc.should be_blank
+  end
+  
+  it "should initially have no errors" do
+    @mail.errors.should == {}
+  end
+
+  it "should be valid when the configuration and fields are correct" do
+    @mail.should be_valid
+  end
+
+  it "should be invalid when the recipients are empty" do
+    @mail.config[:recipients] = []
+    @mail.should_not be_valid
+    @mail.errors['form'].should_not be_blank
+  end
+
+  it "should be invalid when the recipients contains invalid email adresses" do
+    @mail.config[:recipients] = ['sean AT radiant DOT com']
+    @mail.should_not be_valid
+    @mail.errors['form'].should_not be_blank
+  end
+
+  it "should be invalid when the from field is empty" do
+    @mail.config[:from] = nil
+    @mail.should_not be_valid
+    @mail.errors['form'].should_not be_blank
+  end
+
+  it "should be invalid when the from field contains an invalid email address" do
+    @mail.config[:from] = 'sean AT radiant DOT com'
+    @mail.should_not be_valid
+    @mail.errors['form'].should_not be_blank
+  end
+
+  it "should be invalid when a required field is missing" do
+    @mail = Mail.new(@page, {:recipients => ['foo@bar.com'], :from => 'foo@baz.com'}, {:required => {'first_name' => 'true'}})
+    @mail.should_not be_valid
+    @mail.errors['first_name'].should_not be_blank
+  end
+
+  it "should not send the mail if invalid" do
+    @mail.should_receive(:valid?).and_return(false)
+    @mail.send.should be_false
+  end
+
+  it "should send an email" do
+    @mail.send.should be_true
+    ActionMailer::Base.deliveries.should_not be_empty
+  end
+
+  it "should not send and should register an error if the Mailer raised an exception" do
+    Mailer.should_receive(:deliver_generic_mail).and_raise("Boom!")
+    @mail.should be_valid
+    @mail.send.should be_false
+    @mail.errors['base'].should == "Boom!"
+  end
+  
+  it "should set the Reply-To header on the sent mail to the reply_to value given in the configuration" do
+    @mail.config[:reply_to] = "reply_to@example.com"
+    @mail.send
+    ActionMailer::Base.deliveries.last.reply_to.should == [@mail.config[:reply_to]] # reply_to on TMail is an Array
+  end
+
+  it "should set the Reply-To header on the sent mail to the reply_to_field data value given in the configuration" do
+    @mail.config[:reply_to_field] = 'email'
+    @mail.data['email'] = 'reply_to_field@example.com'
+    @mail.send
+    ActionMailer::Base.deliveries.last.reply_to.should == [@mail.data['email']] # reply_to on TMail is an Array
+  end
+
+  it "should set the Reply-To header on the sent mail to the from value when the configuration does not specify a reply_to" do
+    @mail.send
+    ActionMailer::Base.deliveries.last.reply_to.should == ['foo@baz.com'] # reply_to on TMail is an Array
+  end
+
+  describe "when the page has no email body specified" do
+    it "should render the submitted data as YAML to the plain body" do
+      Mailer.should_receive(:deliver_generic_mail) do |params|
+        params[:plain_body].should == "The following information was posted:\n--- \nbody: Hello, world!\n\n"
+        params[:html_body].should be_blank
+      end
+      @mail.send.should be_true
+    end
+  end
+
+  describe "when the page has specified a plain email body" do
+    before :each do
+      @page = pages(:plain_mail)
+      @page.request = ActionController::TestRequest.new
+      @page.last_mail = @mail = Mail.new(@page, {:recipients => ['foo@bar.com'], :from => 'foo@baz.com'}, {'body' => 'Hello, world!'})
+    end
+
+    it "should send an email with the rendered plain body" do
+      Mailer.should_receive(:deliver_generic_mail) do |params|
+        params[:plain_body].should == 'The body: Hello, world!'
+        params[:html_body].should be_blank
+      end
+      @mail.send.should be_true
+    end
+  end
+
+  describe "when the page has specified an HTML email body" do
+    before :each do
+      @page = pages(:html_mail)
+      @page.request = ActionController::TestRequest.new
+      @page.last_mail = @mail = Mail.new(@page, {:recipients => ['foo@bar.com'], :from => 'foo@baz.com'}, {'body' => 'Hello, world!'})
+    end
+
+    it "should send an email with the rendered plain body" do
+      Mailer.should_receive(:deliver_generic_mail) do |params|
+        params[:plain_body].should be_blank
+        params[:html_body].should == '<html><body>Hello, world!</body></html>'
+      end
+      @mail.send.should be_true
+    end
+  end
+end

data/spec/models/mailer_spec.rb

@@ -0,0 +1,76 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Mailer" do
+  before :each do
+    ActionMailer::Base.delivery_method = :test
+    @deliveries = ActionMailer::Base.deliveries = []
+  end
+  
+  def do_deliver(options={})
+    Mailer.deliver_generic_mail({:recipients => ['foo@bar.com'], :plain_body => ''}.merge(options).reject {|k,v| v.nil? })
+  end
+  
+  it "should set the recipients" do
+    do_deliver
+    @deliveries.first.to.should == ['foo@bar.com']
+  end
+
+  it "should be the multipart/alternative content type" do
+    do_deliver
+    @deliveries.first.content_type.should == 'multipart/alternative'
+  end
+  
+  it "should render a plain body" do
+    do_deliver :plain_body => "Hello, world!"
+    @deliveries.first.body.should match(/Hello, world!/)
+  end
+  
+  it "should render an HTML body" do
+    do_deliver :plain_body => nil, :html_body => "<html><body>Hello, world!</body></html>"
+    @deliveries.first.body.should match(%r{<html><body>Hello, world!</body></html>})
+  end
+  
+  it "should render both bodies when present" do
+    do_deliver :plain_body => "Hiya!", :html_body => "<html><body>Hello, world!</body></html>"
+    @deliveries.first.body.should match(/Hiya!/)
+    @deliveries.first.body.should match(%r{<html><body>Hello, world!</body></html>})
+  end
+  
+  it "should set the subject" do
+    do_deliver :subject => "Testing 123"
+    @deliveries.first.subject.should == "Testing 123"
+  end
+  
+  it "should set the from field" do
+    do_deliver :from => "sean@radiant.com"
+    @deliveries.first.from.should == %w'sean@radiant.com'
+  end
+  
+  it "should set the cc field" do
+    do_deliver :cc => "sean@radiant.com"
+    @deliveries.first.cc.should == %w"sean@radiant.com"
+  end
+  
+  it "should set the bcc field" do
+    do_deliver :bcc => "sean@radiant.com"
+    @deliveries.first.bcc.should == %w"sean@radiant.com"
+  end
+  
+  it "should set the headers" do
+    do_deliver :headers => {'Reply-To' => 'sean@cribbs.com'}
+    @deliveries.first['Reply-To'].inspect.should match(/sean@cribbs.com/)
+  end
+  
+  # Not sure that charset works, can see no effect in tests
+  it "should set the default character set to utf8" do
+    pending
+    do_deliver
+    @deliveries.first.charset.should == 'utf8'
+  end
+  
+  it "should set the character set" do
+    pending
+    do_deliver :charset => 'iso8859-1'
+    @deliveries.first.charset.should == 'iso8859-1'
+  end
+end

data/spec/spec.opts

@@ -0,0 +1,6 @@
+--colour
+--format
+progress
+--loadby
+mtime
+--reverse

data/spec/spec_helper.rb

@@ -0,0 +1,36 @@
+unless defined? RADIANT_ROOT
+  ENV["RAILS_ENV"] = "test"
+  case
+  when ENV["RADIANT_ENV_FILE"]
+    require ENV["RADIANT_ENV_FILE"]
+  when File.dirname(__FILE__) =~ %r{vendor/radiant/vendor/extensions}
+    require "#{File.expand_path(File.dirname(__FILE__) + "/../../../../../../")}/config/environment"
+  else
+    require "#{File.expand_path(File.dirname(__FILE__) + "/../../../../")}/config/environment"
+  end
+end
+require "#{RADIANT_ROOT}/spec/spec_helper"
+
+Dataset::Resolver.default << (File.dirname(__FILE__) + "/datasets")
+
+if File.directory?(File.dirname(__FILE__) + "/matchers")
+  Dir[File.dirname(__FILE__) + "/matchers/*.rb"].each {|file| require file }
+end
+
+Spec::Runner.configure do |config|
+  # config.use_transactional_fixtures = true
+  # config.use_instantiated_fixtures  = false
+  # config.fixture_path = RAILS_ROOT + '/spec/fixtures'
+
+  # You can declare fixtures for each behaviour like this:
+  #   describe "...." do
+  #     fixtures :table_a, :table_b
+  #
+  # Alternatively, if you prefer to declare them only once, you can
+  # do so here, like so ...
+  #
+  #   config.global_fixtures = :table_a, :table_b
+  #
+  # If you declare global fixtures, be aware that they will be declared
+  # for all of your examples, even those that don't use them.
+end