createsend 5.1.1 → 6.1.0

data/test/list_test.rb

@@ -11,13 +11,13 @@ class ListTest < Test::Unit::TestCase
     should "create a list without passing in unsubscribe setting" do
       stub_post(@auth, "lists/#{@client_id}.json", "create_list.json")
       list_id = CreateSend::List.create @auth, @client_id, "List One", "", false, ""
-      list_id.should == "e3c5f034d68744f7881fdccf13c2daee"
+      list_id.should be == "e3c5f034d68744f7881fdccf13c2daee"
     end
 
     should "create a list passing in unsubscribe setting" do
       stub_post(@auth, "lists/#{@client_id}.json", "create_list.json")
       list_id = CreateSend::List.create @auth, @client_id, "List One", "", false, "", "OnlyThisList"
-      list_id.should == "e3c5f034d68744f7881fdccf13c2daee"
+      list_id.should be == "e3c5f034d68744f7881fdccf13c2daee"
     end
 
     should "update a list without passing in unsubscribe setting" do
@@ -44,11 +44,11 @@ class ListTest < Test::Unit::TestCase
       stub_post(@auth, "lists/#{@list.list_id}/customfields.json", "create_custom_field.json")
       personalisation_tag = @list.create_custom_field "new date field", "Date"
       request = FakeWeb.last_request.body
-      request.include?("\"FieldName\":\"new date field\"").should == true
-      request.include?("\"DataType\":\"Date\"").should == true
-      request.include?("\"Options\":[]").should == true
-      request.include?("\"VisibleInPreferenceCenter\":true").should == true
-      personalisation_tag.should == "[newdatefield]"
+      request.include?("\"FieldName\":\"new date field\"").should be == true
+      request.include?("\"DataType\":\"Date\"").should be == true
+      request.include?("\"Options\":[]").should be == true
+      request.include?("\"VisibleInPreferenceCenter\":true").should be == true
+      personalisation_tag.should be == "[newdatefield]"
     end
 
     should "create a custom field with options and visible_in_preference_center" do
@@ -57,11 +57,11 @@ class ListTest < Test::Unit::TestCase
       personalisation_tag = @list.create_custom_field("newsletter format",
         "MultiSelectOne", options, false)
       request = FakeWeb.last_request.body
-      request.include?("\"FieldName\":\"newsletter format\"").should == true
-      request.include?("\"DataType\":\"MultiSelectOne\"").should == true
-      request.include?("\"Options\":[\"one\",\"two\"]").should == true
-      request.include?("\"VisibleInPreferenceCenter\":false").should == true
-      personalisation_tag.should == "[newdatefield]"
+      request.include?("\"FieldName\":\"newsletter format\"").should be == true
+      request.include?("\"DataType\":\"MultiSelectOne\"").should be == true
+      request.include?("\"Options\":[\"one\",\"two\"]").should be == true
+      request.include?("\"VisibleInPreferenceCenter\":false").should be == true
+      personalisation_tag.should be == "[newdatefield]"
     end
 
     should "update a custom field" do
@@ -69,9 +69,9 @@ class ListTest < Test::Unit::TestCase
       stub_put(@auth, "lists/#{@list.list_id}/customfields/#{ERB::Util.url_encode(key)}.json", "update_custom_field.json")
       personalisation_tag = @list.update_custom_field key, "my renamed custom field", true
       request = FakeWeb.last_request.body
-      request.include?("\"FieldName\":\"my renamed custom field\"").should == true
-      request.include?("\"VisibleInPreferenceCenter\":true").should == true
-      personalisation_tag.should == "[myrenamedcustomfield]"
+      request.include?("\"FieldName\":\"my renamed custom field\"").should be == true
+      request.include?("\"VisibleInPreferenceCenter\":true").should be == true
+      personalisation_tag.should be == "[myrenamedcustomfield]"
     end
 
     should "delete a custom field" do
@@ -90,168 +90,175 @@ class ListTest < Test::Unit::TestCase
     should "get the details of a list" do
       stub_get(@auth, "lists/#{@list.list_id}.json", "list_details.json")
       details = @list.details
-      details.ConfirmedOptIn.should == false
-      details.Title.should == "a non-basic list :)"
-      details.UnsubscribePage.should == ""
-      details.ListID.should == "2fe4c8f0373ce320e2200596d7ef168f"
-      details.ConfirmationSuccessPage.should == ""
-      details.UnsubscribeSetting.should == "AllClientLists"
+      details.ConfirmedOptIn.should be == false
+      details.Title.should be == "a non-basic list :)"
+      details.UnsubscribePage.should be == ""
+      details.ListID.should be == "2fe4c8f0373ce320e2200596d7ef168f"
+      details.ConfirmationSuccessPage.should be == ""
+      details.UnsubscribeSetting.should be == "AllClientLists"
     end
 
     should "get the custom fields for a list" do
       stub_get(@auth, "lists/#{@list.list_id}/customfields.json", "custom_fields.json")
       cfs = @list.custom_fields
-      cfs.size.should == 3
-      cfs.first.FieldName.should == "website"
-      cfs.first.Key.should == "[website]"
-      cfs.first.DataType.should == "Text"
-      cfs.first.FieldOptions.should == []
-      cfs.first.VisibleInPreferenceCenter.should == true
+      cfs.size.should be == 3
+      cfs.first.FieldName.should be == "website"
+      cfs.first.Key.should be == "[website]"
+      cfs.first.DataType.should be == "Text"
+      cfs.first.FieldOptions.should be == []
+      cfs.first.VisibleInPreferenceCenter.should be == true
     end
 
     should "get the segments for a list" do
       stub_get(@auth, "lists/#{@list.list_id}/segments.json", "segments.json")
       segments = @list.segments
-      segments.size.should == 2
-      segments.first.ListID.should == 'a58ee1d3039b8bec838e6d1482a8a965'
-      segments.first.SegmentID.should == '46aa5e01fd43381863d4e42cf277d3a9'
-      segments.first.Title.should == 'Segment One'
+      segments.size.should be == 2
+      segments.first.ListID.should be == 'a58ee1d3039b8bec838e6d1482a8a965'
+      segments.first.SegmentID.should be == '46aa5e01fd43381863d4e42cf277d3a9'
+      segments.first.Title.should be == 'Segment One'
     end
     
     should "get the stats for a list" do
       stub_get(@auth, "lists/#{@list.list_id}/stats.json", "list_stats.json")
       stats = @list.stats
-      stats.TotalActiveSubscribers.should == 6
-      stats.TotalUnsubscribes.should == 2
-      stats.TotalDeleted.should == 0
-      stats.TotalBounces.should == 0
+      stats.TotalActiveSubscribers.should be == 6
+      stats.TotalUnsubscribes.should be == 2
+      stats.TotalDeleted.should be == 0
+      stats.TotalBounces.should be == 0
     end
     
     should "get the active subscribers for a list" do
       min_date = "2010-01-01"
-      stub_get(@auth, "lists/#{@list.list_id}/active.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false",
+      stub_get(@auth, "lists/#{@list.list_id}/active.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false&includesmspreference=false",
         "active_subscribers.json")
       res = @list.active min_date
-      res.ResultsOrderedBy.should == "email"
-      res.OrderDirection.should == "asc"
-      res.PageNumber.should == 1
-      res.PageSize.should == 1000
-      res.RecordsOnThisPage.should == 5
-      res.TotalNumberOfRecords.should == 5
-      res.NumberOfPages.should == 1
-      res.Results.size.should == 5
-      res.Results.first.EmailAddress.should == "subs+7t8787Y@example.com"
-      res.Results.first.Name.should =="Person One"
-      res.Results.first.Date.should == "2010-10-25 10:28:00"
-      res.Results.first.State.should == "Active"
-      res.Results.first.CustomFields.size.should == 5
-      res.Results.first.CustomFields[0].Key.should == "website"
-      res.Results.first.CustomFields[0].Value.should == "http://example.com"
-      res.Results.first.CustomFields[1].Key.should == "multi select field"
-      res.Results.first.CustomFields[1].Value.should == "option one"
-      res.Results.first.CustomFields[2].Key.should == "multi select field"
-      res.Results.first.CustomFields[2].Value.should == "option two"
-      res.Results.first.ReadsEmailWith.should == "Gmail"
+      res.ResultsOrderedBy.should be == "email"
+      res.OrderDirection.should be == "asc"
+      res.PageNumber.should be == 1
+      res.PageSize.should be == 1000
+      res.RecordsOnThisPage.should be == 5
+      res.TotalNumberOfRecords.should be == 5
+      res.NumberOfPages.should be == 1
+      res.Results.size.should be == 5
+      res.Results.first.EmailAddress.should be == "subs+7t8787Y@example.com"
+      res.Results.first.Name.should be =="Person One"
+      res.Results.first.Date.should be == "2010-10-25 10:28:00"
+      res.Results.first.ListJoinedDate.should be == "2010-10-25 10:28:00"
+      res.Results.first.State.should be == "Active"
+      res.Results.first.CustomFields.size.should be == 5
+      res.Results.first.CustomFields[0].Key.should be == "website"
+      res.Results.first.CustomFields[0].Value.should be == "http://example.com"
+      res.Results.first.CustomFields[1].Key.should be == "multi select field"
+      res.Results.first.CustomFields[1].Value.should be == "option one"
+      res.Results.first.CustomFields[2].Key.should be == "multi select field"
+      res.Results.first.CustomFields[2].Value.should be == "option two"
+      res.Results.first.ReadsEmailWith.should be == "Gmail"
     end
 
     should "get the unconfirmed subscribers for a list" do
       min_date = "2010-01-01"
-      stub_get(@auth, "lists/#{@list.list_id}/unconfirmed.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=true",
+      stub_get(@auth, "lists/#{@list.list_id}/unconfirmed.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=true&includesmspreference=true",
         "unconfirmed_subscribers.json")
-      res = @list.unconfirmed(min_date, 1, 1000, "email", "asc", true)
-      res.ResultsOrderedBy.should == "email"
-      res.OrderDirection.should == "asc"
-      res.PageNumber.should == 1
-      res.PageSize.should == 1000
-      res.RecordsOnThisPage.should == 2
-      res.TotalNumberOfRecords.should == 2
-      res.NumberOfPages.should == 1
-      res.Results.size.should == 2
-      res.Results.first.EmailAddress.should == "subs+7t8787Y@example.com"
-      res.Results.first.Name.should =="Unconfirmed One"
-      res.Results.first.State.should == "Unconfirmed"
-      res.Results.first.ConsentToTrack.should == "Yes"
+      res = @list.unconfirmed(min_date, 1, 1000, "email", "asc", true, include_sms_preference:true)
+      res.ResultsOrderedBy.should be == "email"
+      res.OrderDirection.should be == "asc"
+      res.PageNumber.should be == 1
+      res.PageSize.should be == 1000
+      res.RecordsOnThisPage.should be == 2
+      res.TotalNumberOfRecords.should be == 2
+      res.NumberOfPages.should be == 1
+      res.Results.size.should be == 2
+      res.Results.first.EmailAddress.should be == "subs+7t8787Y@example.com"
+      res.Results.first.Name.should be =="Unconfirmed One"
+      res.Results.first.Date.should be =="2010-10-25 10:28:00"
+      res.Results.first.ListJoinedDate.should be =="2010-10-25 10:28:00"
+      res.Results.first.State.should be == "Unconfirmed"
+      res.Results.first.ConsentToTrack.should be == "Yes"
+      res.Results.first.ConsentToSendSms.should be == "No"
     end
 
     should "get the unsubscribed subscribers for a list" do
       min_date = "2010-01-01"
-      stub_get(@auth, "lists/#{@list.list_id}/unsubscribed.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false",
+      stub_get(@auth, "lists/#{@list.list_id}/unsubscribed.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false&includesmspreference=false",
         "unsubscribed_subscribers.json")
       res = @list.unsubscribed min_date
-      res.ResultsOrderedBy.should == "email"
-      res.OrderDirection.should == "asc"
-      res.PageNumber.should == 1
-      res.PageSize.should == 1000
-      res.RecordsOnThisPage.should == 5
-      res.TotalNumberOfRecords.should == 5
-      res.NumberOfPages.should == 1
-      res.Results.size.should == 5
-      res.Results.first.EmailAddress.should == "subscriber@example.com"
-      res.Results.first.Name.should == "Unsub One"
-      res.Results.first.Date.should == "2010-10-25 13:11:00"
-      res.Results.first.State.should == "Unsubscribed"
-      res.Results.first.CustomFields.size.should == 0
-      res.Results.first.ReadsEmailWith.should == "Gmail"
+      res.ResultsOrderedBy.should be == "email"
+      res.OrderDirection.should be == "asc"
+      res.PageNumber.should be == 1
+      res.PageSize.should be == 1000
+      res.RecordsOnThisPage.should be == 5
+      res.TotalNumberOfRecords.should be == 5
+      res.NumberOfPages.should be == 1
+      res.Results.size.should be == 5
+      res.Results.first.EmailAddress.should be == "subscriber@example.com"
+      res.Results.first.Name.should be == "Unsub One"
+      res.Results.first.Date.should be == "2010-10-25 13:11:00"
+      res.Results.first.ListJoinedDate.should be == "2010-10-25 13:11:00"
+      res.Results.first.State.should be == "Unsubscribed"
+      res.Results.first.CustomFields.size.should be == 0
+      res.Results.first.ReadsEmailWith.should be == "Gmail"
     end
 
     should "get the deleted subscribers for a list" do
       min_date = "2010-01-01"
-      stub_get(@auth, "lists/#{@list.list_id}/deleted.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false",
+      stub_get(@auth, "lists/#{@list.list_id}/deleted.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false&includesmspreference=false",
         "deleted_subscribers.json")
       res = @list.deleted min_date
-      res.ResultsOrderedBy.should == "email"
-      res.OrderDirection.should == "asc"
-      res.PageNumber.should == 1
-      res.PageSize.should == 1000
-      res.RecordsOnThisPage.should == 5
-      res.TotalNumberOfRecords.should == 5
-      res.NumberOfPages.should == 1
-      res.Results.size.should == 5
-      res.Results.first.EmailAddress.should == "subscriber@example.com"
-      res.Results.first.Name.should == "Deleted One"
-      res.Results.first.Date.should == "2010-10-25 13:11:00"
-      res.Results.first.State.should == "Deleted"
-      res.Results.first.CustomFields.size.should == 0
-      res.Results.first.ReadsEmailWith.should == "Gmail"
+      res.ResultsOrderedBy.should be == "email"
+      res.OrderDirection.should be == "asc"
+      res.PageNumber.should be == 1
+      res.PageSize.should be == 1000
+      res.RecordsOnThisPage.should be == 5
+      res.TotalNumberOfRecords.should be == 5
+      res.NumberOfPages.should be == 1
+      res.Results.size.should be == 5
+      res.Results.first.EmailAddress.should be == "subscriber@example.com"
+      res.Results.first.Name.should be == "Deleted One"
+      res.Results.first.Date.should be == "2010-10-25 13:11:00"
+      res.Results.first.ListJoinedDate.should be == "2010-10-25 13:11:00"
+      res.Results.first.State.should be == "Deleted"
+      res.Results.first.CustomFields.size.should be == 0
+      res.Results.first.ReadsEmailWith.should be == "Gmail"
     end
 
     should "get the bounced subscribers for a list" do
       min_date = "2010-01-01"
-      stub_get(@auth, "lists/#{@list.list_id}/bounced.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false",
+      stub_get(@auth, "lists/#{@list.list_id}/bounced.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false&includesmspreference=false",
         "bounced_subscribers.json")
       res = @list.bounced min_date
-      res.ResultsOrderedBy.should == "email"
-      res.OrderDirection.should == "asc"
-      res.PageNumber.should == 1
-      res.PageSize.should == 1000
-      res.RecordsOnThisPage.should == 1
-      res.TotalNumberOfRecords.should == 1
-      res.NumberOfPages.should == 1
-      res.Results.size.should == 1
-      res.Results.first.EmailAddress.should == "bouncedsubscriber@example.com"
-      res.Results.first.Name.should == "Bounced One"
-      res.Results.first.Date.should == "2010-10-25 13:11:00"
-      res.Results.first.State.should == "Bounced"
-      res.Results.first.CustomFields.size.should == 0
-      res.Results.first.ReadsEmailWith.should == ""
+      res.ResultsOrderedBy.should be == "email"
+      res.OrderDirection.should be == "asc"
+      res.PageNumber.should be == 1
+      res.PageSize.should be == 1000
+      res.RecordsOnThisPage.should be == 1
+      res.TotalNumberOfRecords.should be == 1
+      res.NumberOfPages.should be == 1
+      res.Results.size.should be == 1
+      res.Results.first.EmailAddress.should be == "bouncedsubscriber@example.com"
+      res.Results.first.Name.should be == "Bounced One"
+      res.Results.first.Date.should be == "2010-10-25 13:11:00"
+      res.Results.first.ListJoinedDate.should be == "2010-10-25 13:11:00"
+      res.Results.first.State.should be == "Bounced"
+      res.Results.first.CustomFields.size.should be == 0
+      res.Results.first.ReadsEmailWith.should be == ""
     end
 
     should "get the webhooks for a list" do
       stub_get(@auth, "lists/#{@list.list_id}/webhooks.json", "list_webhooks.json")
       hooks = @list.webhooks
-      hooks.size.should == 2
-      hooks.first.WebhookID.should == "943678317049bc13"
-      hooks.first.Events.size.should == 1
-      hooks.first.Events.first.should == "Deactivate"
-      hooks.first.Url.should == "http://www.postbin.org/d9w8ud9wud9w"
-      hooks.first.Status.should == "Active"
-      hooks.first.PayloadFormat.should == "Json"
+      hooks.size.should be == 2
+      hooks.first.WebhookID.should be == "943678317049bc13"
+      hooks.first.Events.size.should be == 1
+      hooks.first.Events.first.should be == "Deactivate"
+      hooks.first.Url.should be == "http://www.postbin.org/d9w8ud9wud9w"
+      hooks.first.Status.should be == "Active"
+      hooks.first.PayloadFormat.should be == "Json"
     end
 
     should "create a webhook for a list" do
       stub_post(@auth, "lists/#{@list.list_id}/webhooks.json", "create_list_webhook.json")
       webhook_id = @list.create_webhook ["Unsubscribe", "Spam"], "http://example.com/unsub", "json"
-      webhook_id.should == "6a783d359bd44ef62c6ca0d3eda4412a"
+      webhook_id.should be == "6a783d359bd44ef62c6ca0d3eda4412a"
     end
     
     should "test a webhook for a list" do

data/test/person_test.rb

@@ -11,16 +11,16 @@ class PersonTest < Test::Unit::TestCase
       email = "person@example.com"
       stub_get(@auth, "clients/#{@client_id}/people.json?email=#{ERB::Util.url_encode(email)}", "person_details.json")
       person = CreateSend::Person.get @auth, @client_id, email
-      person.EmailAddress.should == email
-      person.Name.should == "Person One"
-      person.AccessLevel.should == 1023
-      person.Status.should == "Active"
+      person.EmailAddress.should be == email
+      person.Name.should be == "Person One"
+      person.AccessLevel.should be == 1023
+      person.Status.should be == "Active"
     end
 
     should "add a person" do
       stub_post(@auth, "clients/#{@client_id}/people.json", "add_person.json")
       result = CreateSend::Person.add @auth, @client_id, "person@example.com", "Person", 0, "Password"
-      result.EmailAddress.should == "person@example.com"
+      result.EmailAddress.should be == "person@example.com"
     end
 
     should "update a person" do
@@ -28,7 +28,7 @@ class PersonTest < Test::Unit::TestCase
       new_email = "new_email_address@example.com"
       stub_put(@auth, "clients/#{@client_id}/people.json?email=#{ERB::Util.url_encode(email)}", nil)
       @person.update new_email, "Person", 1023, "NewPassword"
-      @person.email_address.should == new_email
+      @person.email_address.should be == new_email
     end
       
     should "delete a person" do

data/test/segment_test.rb

@@ -11,7 +11,7 @@ class SegmentTest < Test::Unit::TestCase
       rule_groups = [ { :Rules => [ { :RuleType => "EmailAddress", :Clause => "CONTAINS example.com" } ] } ]
       stub_post(@auth, "segments/#{list_id}.json", "create_segment.json")
       res = CreateSend::Segment.create @auth, list_id, "new segment title", rule_groups
-      res.should == "0246c2aea610a3545d9780bf6ab89006"
+      res.should be == "0246c2aea610a3545d9780bf6ab89006"
     end
 
     should "update a segment" do
@@ -31,19 +31,20 @@ class SegmentTest < Test::Unit::TestCase
       stub_get(@auth, "segments/#{@segment.segment_id}/active.json?pagesize=1000&orderfield=email&page=1&orderdirection=asc&date=#{ERB::Util.url_encode(min_date)}&includetrackingpreference=false",
         "segment_subscribers.json")
       res = @segment.subscribers min_date
-      res.ResultsOrderedBy.should == "email"
-      res.OrderDirection.should == "asc"
-      res.PageNumber.should == 1
-      res.PageSize.should == 1000
-      res.RecordsOnThisPage.should == 2
-      res.TotalNumberOfRecords.should == 2
-      res.NumberOfPages.should == 1
-      res.Results.size.should == 2
-      res.Results.first.EmailAddress.should == "personone@example.com"
-      res.Results.first.Name.should == "Person One"
-      res.Results.first.Date.should == "2010-10-27 13:13:00"
-      res.Results.first.State.should == "Active"
-      res.Results.first.CustomFields.should == []
+      res.ResultsOrderedBy.should be == "email"
+      res.OrderDirection.should be == "asc"
+      res.PageNumber.should be == 1
+      res.PageSize.should be == 1000
+      res.RecordsOnThisPage.should be == 2
+      res.TotalNumberOfRecords.should be == 2
+      res.NumberOfPages.should be == 1
+      res.Results.size.should be == 2
+      res.Results.first.EmailAddress.should be == "personone@example.com"
+      res.Results.first.Name.should be == "Person One"
+      res.Results.first.Date.should be == "2010-10-27 13:13:00"
+      res.Results.first.ListJoinedDate.should be == "2010-10-27 13:13:00"
+      res.Results.first.State.should be == "Active"
+      res.Results.first.CustomFields.should be == []
     end
 
     should "delete a segment" do
@@ -54,14 +55,14 @@ class SegmentTest < Test::Unit::TestCase
     should "get the details of a segment" do
       stub_get(@auth, "segments/#{@segment.segment_id}.json", "segment_details.json")
       res = @segment.details
-      res.ActiveSubscribers.should == 0
-      res.RuleGroups.size.should == 2
-      res.RuleGroups.first.Rules.size.should == 1
-      res.RuleGroups.first.Rules.first.RuleType.should == "EmailAddress"
-      res.RuleGroups.first.Rules.first.Clause.should == "CONTAINS @hello.com"
-      res.ListID.should == "2bea949d0bf96148c3e6a209d2e82060"
-      res.SegmentID.should == "dba84a225d5ce3d19105d7257baac46f"
-      res.Title.should == "My Segment"
+      res.ActiveSubscribers.should be == 0
+      res.RuleGroups.size.should be == 2
+      res.RuleGroups.first.Rules.size.should be == 1
+      res.RuleGroups.first.Rules.first.RuleType.should be == "EmailAddress"
+      res.RuleGroups.first.Rules.first.Clause.should be == "CONTAINS @hello.com"
+      res.ListID.should be == "2bea949d0bf96148c3e6a209d2e82060"
+      res.SegmentID.should be == "dba84a225d5ce3d19105d7257baac46f"
+      res.Title.should be == "My Segment"
     end
 
     should "clear a segment's rules" do

data/test/subscriber_test.rb

@@ -11,36 +11,40 @@ class SubscriberTest < Test::Unit::TestCase
       email = "subscriber@example.com"
       stub_get(@auth, "subscribers/#{@list_id}.json?email=#{ERB::Util.url_encode(email)}&includetrackingpreference=false", "subscriber_details.json")
       subscriber = CreateSend::Subscriber.get @auth, @list_id, email
-      subscriber.EmailAddress.should == email
-      subscriber.Name.should == "Subscriber One"
-      subscriber.Date.should == "2010-10-25 10:28:00"
-      subscriber.State.should == "Active"
-      subscriber.CustomFields.size.should == 3
-      subscriber.CustomFields.first.Key.should == 'website'
-      subscriber.CustomFields.first.Value.should == 'http://example.com'
-      subscriber.ReadsEmailWith.should == "Gmail"
+      subscriber.EmailAddress.should be == email
+      subscriber.Name.should be == "Subscriber One"
+      subscriber.Date.should be == "2010-10-25 10:28:00"
+      subscriber.MobileNumber.should be == "+61423153526"
+      subscriber.ListJoinedDate.should be == "2010-10-25 10:28:00"
+      subscriber.State.should be == "Active"
+      subscriber.CustomFields.size.should be == 3
+      subscriber.CustomFields.first.Key.should be == 'website'
+      subscriber.CustomFields.first.Value.should be == 'http://example.com'
+      subscriber.ReadsEmailWith.should be == "Gmail"
     end
 
-    should "get a subscriber with track preference information" do
+    should "get a subscriber with track and sms preference information" do
       email = "subscriber@example.com"
-      stub_get(@auth, "subscribers/#{@list_id}.json?email=#{ERB::Util.url_encode(email)}&includetrackingpreference=true", "subscriber_details_with_track_pref.json")
+      stub_get(@auth, "subscribers/#{@list_id}.json?email=#{ERB::Util.url_encode(email)}&includetrackingpreference=true", "subscriber_details_with_track_and_sms_pref.json")
       subscriber = CreateSend::Subscriber.get @auth, @list_id, email, true
-      subscriber.EmailAddress.should == email
-      subscriber.Name.should == "Subscriber One"
-      subscriber.ConsentToTrack == "Yes"
+      subscriber.EmailAddress.should be == email
+      subscriber.Name.should be == "Subscriber One"
+      subscriber.MobileNumber.should be == "+61423153526"
+      subscriber.ConsentToTrack.should be == "Yes"
+      subscriber.ConsentToSendSms.should be == "No"
     end
 
     should "add a subscriber without custom fields" do
       stub_post(@auth, "subscribers/#{@list_id}.json", "add_subscriber.json")
       email_address = CreateSend::Subscriber.add @auth, @list_id, "subscriber@example.com", "Subscriber", [], true, "Yes"
-      email_address.should == "subscriber@example.com"
+      email_address.should be == "subscriber@example.com"
     end
 
     should "add a subscriber with custom fields" do
       stub_post(@auth, "subscribers/#{@list_id}.json", "add_subscriber.json")
       custom_fields = [ { :Key => 'website', :Value => 'http://example.com/' } ]
       email_address = CreateSend::Subscriber.add @auth, @list_id, "subscriber@example.com", "Subscriber", custom_fields, true, "Yes"
-      email_address.should == "subscriber@example.com"
+      email_address.should be == "subscriber@example.com"
     end
 
     should "add a subscriber with custom fields including multi-option fields" do
@@ -49,7 +53,7 @@ class SubscriberTest < Test::Unit::TestCase
         { :Key => 'multioptionselectmany', :Value => 'firstoption' },
         { :Key => 'multioptionselectmany', :Value => 'secondoption' } ]
       email_address = CreateSend::Subscriber.add @auth, @list_id, "subscriber@example.com", "Subscriber", custom_fields, true, "Yes"
-      email_address.should == "subscriber@example.com"
+      email_address.should be == "subscriber@example.com"
     end
 
     should "update a subscriber with custom fields" do
@@ -58,7 +62,7 @@ class SubscriberTest < Test::Unit::TestCase
       stub_put(@auth, "subscribers/#{@list_id}.json?email=#{ERB::Util.url_encode(email)}", nil)
       custom_fields = [ { :Key => 'website', :Value => 'http://example.com/' } ]
       @subscriber.update new_email, "Subscriber", custom_fields, true, "Yes"
-      @subscriber.email_address.should == new_email
+      @subscriber.email_address.should be == new_email
     end
 
     should "update a subscriber with custom fields including the clear option" do
@@ -67,7 +71,7 @@ class SubscriberTest < Test::Unit::TestCase
       stub_put(@auth, "subscribers/#{@list_id}.json?email=#{ERB::Util.url_encode(email)}", nil)
       custom_fields = [ { :Key => 'website', :Value => '', :Clear => true } ]
       @subscriber.update new_email, "Subscriber", custom_fields, true, "No"
-      @subscriber.email_address.should == new_email
+      @subscriber.email_address.should be == new_email
     end
     
     should "import many subscribers at once" do
@@ -78,11 +82,11 @@ class SubscriberTest < Test::Unit::TestCase
         { :EmailAddress => "example+3@example.com", :Name => "Example Three" },
       ]
       import_result = CreateSend::Subscriber.import @auth, @list_id, subscribers, true
-      import_result.FailureDetails.size.should == 0
-      import_result.TotalUniqueEmailsSubmitted.should == 3
-      import_result.TotalExistingSubscribers.should == 0
-      import_result.TotalNewSubscribers.should == 3
-      import_result.DuplicateEmailsInSubmission.size.should == 0
+      import_result.FailureDetails.size.should be == 0
+      import_result.TotalUniqueEmailsSubmitted.should be == 3
+      import_result.TotalExistingSubscribers.should be == 0
+      import_result.TotalNewSubscribers.should be == 3
+      import_result.DuplicateEmailsInSubmission.size.should be == 0
     end
 
     should "import many subscribers at once, and start subscription-based autoresponders" do
@@ -93,11 +97,11 @@ class SubscriberTest < Test::Unit::TestCase
         { :EmailAddress => "example+3@example.com", :Name => "Example Three" },
       ]
       import_result = CreateSend::Subscriber.import @auth, @list_id, subscribers, true, true
-      import_result.FailureDetails.size.should == 0
-      import_result.TotalUniqueEmailsSubmitted.should == 3
-      import_result.TotalExistingSubscribers.should == 0
-      import_result.TotalNewSubscribers.should == 3
-      import_result.DuplicateEmailsInSubmission.size.should == 0
+      import_result.FailureDetails.size.should be == 0
+      import_result.TotalUniqueEmailsSubmitted.should be == 3
+      import_result.TotalExistingSubscribers.should be == 0
+      import_result.TotalNewSubscribers.should be == 3
+      import_result.DuplicateEmailsInSubmission.size.should be == 0
     end
 
     should "import many subscribers at once with custom fields, including the clear option" do
@@ -108,11 +112,11 @@ class SubscriberTest < Test::Unit::TestCase
         { :EmailAddress => "example+3@example.com", :Name => "Example Three", :CustomFields => [ { :Key => 'website', :Value => '', :Clear => false } ]  },
       ]
       import_result = CreateSend::Subscriber.import @auth, @list_id, subscribers, true
-      import_result.FailureDetails.size.should == 0
-      import_result.TotalUniqueEmailsSubmitted.should == 3
-      import_result.TotalExistingSubscribers.should == 0
-      import_result.TotalNewSubscribers.should == 3
-      import_result.DuplicateEmailsInSubmission.size.should == 0
+      import_result.FailureDetails.size.should be == 0
+      import_result.TotalUniqueEmailsSubmitted.should be == 3
+      import_result.TotalExistingSubscribers.should be == 0
+      import_result.TotalNewSubscribers.should be == 3
+      import_result.DuplicateEmailsInSubmission.size.should be == 0
     end
 
     should "import many subscribers at once with partial success" do
@@ -124,14 +128,14 @@ class SubscriberTest < Test::Unit::TestCase
         { :EmailAddress => "example+3@example.com", :Name => "Example Three" },
       ]
       import_result = CreateSend::Subscriber.import @auth, @list_id, subscribers, true
-      import_result.FailureDetails.size.should == 1
-      import_result.FailureDetails.first.EmailAddress.should == "example+1@example"
-      import_result.FailureDetails.first.Code.should == 1
-      import_result.FailureDetails.first.Message.should == "Invalid Email Address"
-      import_result.TotalUniqueEmailsSubmitted.should == 3
-      import_result.TotalExistingSubscribers.should == 2
-      import_result.TotalNewSubscribers.should == 0
-      import_result.DuplicateEmailsInSubmission.size.should == 0
+      import_result.FailureDetails.size.should be == 1
+      import_result.FailureDetails.first.EmailAddress.should be == "example+1@example"
+      import_result.FailureDetails.first.Code.should be == 1
+      import_result.FailureDetails.first.Message.should be == "Invalid Email Address"
+      import_result.TotalUniqueEmailsSubmitted.should be == 3
+      import_result.TotalExistingSubscribers.should be == 2
+      import_result.TotalNewSubscribers.should be == 0
+      import_result.DuplicateEmailsInSubmission.size.should be == 0
     end
 
     should "raise a BadRequest error if the import _completely_ fails because of a bad request" do
@@ -142,7 +146,7 @@ class SubscriberTest < Test::Unit::TestCase
         { :EmailAddress => "example+2@example.com", :Name => "Example Two" },
         { :EmailAddress => "example+3@example.com", :Name => "Example Three" },
       ]
-      lambda { import_result = CreateSend::Subscriber.import @auth, @list_id, subscribers, 
+      lambda { CreateSend::Subscriber.import @auth, @list_id, subscribers, 
         true }.should raise_error(CreateSend::BadRequest)
     end
 
@@ -154,15 +158,15 @@ class SubscriberTest < Test::Unit::TestCase
     should "get a subscriber's history" do
       stub_get(@auth, "subscribers/#{@subscriber.list_id}/history.json?email=#{ERB::Util.url_encode(@subscriber.email_address)}", "subscriber_history.json")
       history = @subscriber.history
-      history.size.should == 1
-      history.first.Name.should == "Campaign One"
-      history.first.Type.should == "Campaign"
-      history.first.ID.should == "fc0ce7105baeaf97f47c99be31d02a91"
-      history.first.Actions.size.should == 6
-      history.first.Actions.first.Event.should ==  "Open"
-      history.first.Actions.first.Date.should ==  "2010-10-12 13:18:00"
-      history.first.Actions.first.IPAddress.should == "192.168.126.87"
-      history.first.Actions.first.Detail.should == ""
+      history.size.should be == 1
+      history.first.Name.should be == "Campaign One"
+      history.first.Type.should be == "Campaign"
+      history.first.ID.should be == "fc0ce7105baeaf97f47c99be31d02a91"
+      history.first.Actions.size.should be == 6
+      history.first.Actions.first.Event.should be ==  "Open"
+      history.first.Actions.first.Date.should be ==  "2010-10-12 13:18:00"
+      history.first.Actions.first.IPAddress.should be == "192.168.126.87"
+      history.first.Actions.first.Detail.should be == ""
     end
 
     should "delete a subscriber" do