function mailing_list_import_form in Mailing List 7

Same name and namespace in other branches

1. 6 mailing_list.admin.inc \mailing_list_import_form()

Form for importing a mailing list from a CSV file.

1 string reference to 'mailing_list_import_form'

mailing_list_menu in ./mailing_list.module

Implement hook_menu().

File

./mailing_list.admin.inc, line 308

Mailing list admin UI.

Code

function mailing_list_import_form($form, $form_state, $list) {
  if (empty($list)) {
    return;
  }
  drupal_set_title(t('Import e-mails'));
  $form = array();
  $form['#attributes'] = array(
    'enctype' => "multipart/form-data",
  );
  if (isset($form_state['values']['mlid']) || isset($list)) {
    $form['mlid'] = array(
      '#type' => 'hidden',
      '#value' => isset($form_state['values']['mlid']) ? $form_state['values']['mlid'] : isset($list) ? $list->mlid : null,
    );
  }
  if (isset($form_state['values']['name']) || isset($list)) {
    $form['name'] = array(
      '#type' => 'hidden',
      '#value' => isset($form_state['values']['name']) ? $form_state['values']['name'] : isset($list) ? $list->name : null,
    );
  }
  $form['file_upload'] = array(
    '#title' => t('CSV file'),
    '#type' => 'file',
  );
  $form['submit'] = array(
    '#value' => t('Import'),
    '#type' => 'submit',
  );
  return $form;
}