function _subscriptions_mail_form_mail_edit_list_form_alter in Subscriptions 6

Implementation of hook_form_alter().

Adds to the General Settings part at admin/settings/subscriptions.

1 call to _subscriptions_mail_form_mail_edit_list_form_alter()

subscriptions_mail_form_mail_edit_list_form_alter in ./subscriptions_mail.module

Implementation of hook_form_alter().

File

./subscriptions_mail.mail_edit_D5.inc, line 13

Subscriptions module mail gateway helper functions for upgrading mail_edit D5 to D6.

Code

function _subscriptions_mail_form_mail_edit_list_form_alter(&$form, $form_state) {
  $form['subscriptions'] = array(
    '#type' => 'fieldset',
    '#title' => t('!Subscriptions module', array(
      '!Subscriptions' => 'Subscriptions',
    )),
    '#weight' => -5,
  );
  $form['subscriptions']['explain'] = array(
    '#type' => 'item',
    '#value' => t('You have !Subscriptions mail templates that were created under Drupal 5. Please import or remove these templates.', array(
      '!Subscriptions' => 'Subscriptions',
    )),
  );
  $lang_query = "SELECT DISTINCT(language) FROM {mail_edit} ORDER BY language ASC";
  $lang_result = db_query($lang_query);
  $mail_langs = array();

  //fetch all current translations
  while ($row = db_fetch_object($lang_result)) {
    $mail_langs[$row->language] = $row->language;
  }
  foreach (language_list() as $lang_key => $language) {
    $mail_langs[$lang_key] = $lang_key;
  }

  //<!-- fetch all current translations
  if (count($mail_langs) > 1) {
    $form['subscriptions']['languages'] = array(
      '#type' => 'select',
      '#title' => t('Language(s)'),
      '#default_value' => array(),
      '#options' => $mail_langs,
      '#description' => t('Select all the language(s) into which to import the Drupal 5 !Subscriptions mail templates.<br />Note: After successful importing, the old templates are removed automatically.', array(
        '!Subscriptions' => 'Subscriptions',
      )),
      '#multiple' => TRUE,
    );
  }
  else {
    $form['subscriptions']['language'] = array(
      '#type' => 'value',
      '#value' => current($mail_langs),
    );
  }
  $form['subscriptions']['import'] = array(
    '#type' => 'submit',
    '#value' => t('Import'),
  );
  $form['subscriptions']['remove'] = array(
    '#type' => 'submit',
    '#value' => t('Remove'),
  );
  $form['#validate'][] = 'subscriptions_mail_mail_edit_list_form_validate';
  $form['#submit'][] = 'subscriptions_mail_mail_edit_list_form_submit';
}