function mailchimp_lists_freeform_subscribe_page_access in Mailchimp 7.2

Access callback for mailchimp_lists_freeform_subscribe_page().

1 string reference to 'mailchimp_lists_freeform_subscribe_page_access'

mailchimp_lists_menu in modules/mailchimp_lists/mailchimp_lists.module

Implements hook_menu().

File

modules/mailchimp_lists/mailchimp_lists.module, line 112

Mailchimp lists module.

Code

function mailchimp_lists_freeform_subscribe_page_access() {
  $ret = user_access('administer mailchimp');
  if (!$ret) {
    global $user;
    $lists = mailchimp_lists_get_available_lists($user);
    $ret = count($lists) > 0;
  }
  return $ret;
}