public function MailchimpListsTestCase::testUnsubscribe in Mailchimp 7.3

Same name and namespace in other branches

1. 7.5 modules/mailchimp_lists/tests/mailchimp_lists.test \MailchimpListsTestCase::testUnsubscribe()
2. 7.4 modules/mailchimp_lists/tests/mailchimp_lists.test \MailchimpListsTestCase::testUnsubscribe()

Tests unsubscribing a member from a list.

File

modules/mailchimp_lists/tests/mailchimp_lists.test, line 188

Test class and methods for the Mailchimp Lists module.

Class

MailchimpListsTestCase

@file Test class and methods for the Mailchimp Lists module.

Code

public function testUnsubscribe() {
  $list_id = MAILCHIMP_LISTS_TEST_LIST_A;
  $email = 'user@example.org';
  $subscribed = mailchimp_subscribe($list_id, $email);
  $this
    ->assertTrue($subscribed, 'Tested new user subscription.');
  $unsubscribed = mailchimp_unsubscribe($list_id, $email);
  $this
    ->assertTrue($unsubscribed, 'Tested user unsubscription.');
  $member_info = mailchimp_get_memberinfo($list_id, $email);
  $this
    ->assertEqual($member_info['status'], 'unsubscribed', 'Tested updated subscription state.');

  // Reset subscription.
  mailchimp_subscribe($list_id, $email);

  // Delete member.
  mailchimp_unsubscribe($list_id, $email, TRUE);
  $member_info = mailchimp_get_memberinfo($list_id, $email);
  $this
    ->assertTrue(empty($member_info), 'Tested user deletion on unsubscribe.');
}