mailinglist_members.install

Go to the documentation of this file.

<?php
function mailinglist_members_schema() {
  $schema=array();
  $lists = mailinglist_list_load_all();
  foreach ($lists as $list) {
    $list_schema = _mailinglist_members_list_schema($list);
    $schema += $list_schema;
  }
  return $schema;
}

function mailinglist_members_enable() {
}

function mailinglist_members_modules_enabled($modules) {
  // Make sure all previous created lists have roles created.
  $lists = mailinglist_list_load_all();
  foreach ($lists as $list) {
    $rolename = 'Mailingling List Subscriber ' . $list->admin_name;
    if (!user_role_load_by_name($rolename)) {
      $role = new stdClass();
      $role->name = $rolename;
      dpm($role, 'Make Role');
      user_role_save($role);
    }
  }
}