function user_relationship_mailer_form_alter in User Relationships 5

Same name and namespace in other branches

1. 5.2 plugins/user_relationship_mailer/user_relationship_mailer.module \user_relationship_mailer_form_alter()
2. 6 user_relationship_mailer/user_relationship_mailer.module \user_relationship_mailer_form_alter()
3. 7 user_relationship_mailer/user_relationship_mailer.module \user_relationship_mailer_form_alter()

hook_form_alter()

File

plugins/user_relationship_mailer/user_relationship_mailer.module, line 113

Code

function user_relationship_mailer_form_alter($form_id, &$form) {
  switch ($form_id) {
    case 'user_relationships_settings':
      global $user;
      $relationship = user_relationships_relationship_types_load();
      $relationship = array_pop($relationship);
      $form['mail'] = array(
        '#type' => 'fieldset',
        '#title' => t('Email Options'),
        '#weight' => -9,
      );
      $form['mail']['user_relationship_mailer_send_mail'] = array(
        '#type' => 'checkbox',
        '#title' => t('Allow users to turn off relationship messages'),
        '#default_value' => variable_get('user_relationship_mailer_send_mail', FALSE),
        '#description' => t('If you check this, users will have a new setting on their account edit page.'),
      );
      $user_relationship_mailer_ops = variable_get('user_relationship_mailer_ops', array());
      foreach ($user_relationship_mailer_ops as $op) {
        $message_function = "user_relationship_mailer_{$op}_default";
        $form['mail'][$op] = array(
          '#type' => 'fieldset',
          '#title' => t(ucfirst($op)),
          '#collapsible' => TRUE,
          '#collapsed' => TRUE,
        );
        $form['mail'][$op]["user_relationship_mailer_send_{$op}"] = array(
          '#type' => 'checkbox',
          '#title' => t('Send @op messages', array(
            '@op' => $op,
          )),
          '#default_value' => variable_get("user_relationship_mailer_send_{$op}", TRUE),
        );
        $form['mail'][$op]["user_relationship_mailer_{$op}_subject"] = array(
          '#type' => 'textfield',
          '#title' => t('@Op relationship email subject', array(
            '@Op' => ucfirst($op),
          )),
          '#default_value' => variable_get("user_relationship_mailer_{$op}_subject", constant(strtoupper("user_relationship_mailer_{$op}_subject"))),
        );
        $form['mail'][$op]["user_relationship_mailer_{$op}_message"] = array(
          '#type' => 'textarea',
          '#title' => t('@Op relationship email message', array(
            '@Op' => ucfirst($op),
          )),
          '#default_value' => variable_get("user_relationship_mailer_{$op}_message", $message_function()),
          '#description' => t('Replacement strings are: %macros', array(
            '%macros' => implode(', ', array_keys(user_relationship_mailer_replacements($relationship))),
          )),
        );
      }
      break;
  }
}