Fixed hook doc blocks, converted a select query to DBTNG

 */

/**

 * Implementation of hook_schema_alter.

 * Implements hook_schema_alter().

 */

function role_export_schema_alter(&$schema) {

  // Add machine_name field to the 'role' table.

}

/**

 * Implementation of hook_install().

 * Implements hook_install().

 */

function role_export_install() {

  db_add_field('role', 'machine_name', array(

  // Update any existing roles (except anonymous, authenticated) to have a

  // machine name and save it to the 'role' table.

  $roles = db_query("SELECT rid, name FROM {role} WHERE rid != 1 AND rid != 2");

  $roles = db_select('role')

    ->fields('role', array('rid', 'name'))

    ->condition('rid', array(1, 2), 'NOT IN')

    ->execute()

    ->fetchAll();

  foreach ($roles as $role) {

    $rid = $role->rid;

    $machine_name = 'role-' . str_replace(' ', '_', strtolower($role->name));

}

/**

 * Implementation of hook_uninstall().

 * Implements hook_uninstall().

 */

function role_export_uninstall() {

  db_drop_field('role', 'machine_name');

 */

/**

 * Implementation of hook_form_alter().

 * Implements hook_form_alter().

 */

function role_export_form_alter(&$form, &$form_state, $form_id) {

  switch ($form_id) {

}

/**

 * Implementation of hook_theme().

 * Implements hook_theme().

 */

function role_export_theme() {

  return array(

  return $roles;

}

/**

 * Implements hook_user_role_insert().

 */

function role_export_user_role_insert($role) {

  // Use the role name if no machine name is present.

  // Generate a machine name from the role name if the machine name is not