Index: mailchimp.module =================================================================== RCS file: /cvs/drupal-contrib/contributions/modules/mailchimp/mailchimp.module,v retrieving revision 1.2.2.1.2.3.2.8.2.34 diff -u -r1.2.2.1.2.3.2.8.2.34 mailchimp.module --- mailchimp.module 19 Oct 2009 15:59:37 -0000 1.2.2.1.2.3.2.8.2.34 +++ mailchimp.module 19 Oct 2009 22:00:47 -0000 @@ -963,19 +963,21 @@ * Get all of the lists that the given user can subscribe to */ function _mailchimp_get_available_lists($user) { - $lists = variable_get('mailchimp_lists', array()); - if (!empty($lists)) { - $lists = unserialize($lists); - foreach ($lists as $key => $list) { + $all_lists = variable_get('mailchimp_lists', array()); + $available_lists = array(); + if (!empty($all_lists)) { + $all_lists = unserialize($all_lists); + foreach ($all_lists as $key => $list) { foreach ((array)$user->roles as $rid => $info) { - if (!$list->roles[$rid]) { - unset($lists[$key]); + if ($list->roles[$rid]) { + $available_lists[] = $list; + break; } } } } - return $lists; + return $available_lists; } /**