function campaignmonitor_general_form in Campaign Monitor 6.2
Same name and namespace in other branches
- 5.2 campaignmonitor.module \campaignmonitor_general_form()
- 5 campaignmonitor.module \campaignmonitor_general_form()
- 6 campaignmonitor.module \campaignmonitor_general_form()
1 string reference to 'campaignmonitor_general_form'
- template_preprocess_campaignmonitor_block_content in ./
campaignmonitor.module - Block template preprocessor
File
- ./
campaignmonitor.module, line 221
Code
function campaignmonitor_general_form() {
global $user;
$name = '';
$email = '';
$default = FALSE;
// try to get name from default key values
$account = campaignmonitor_get_field_key_values($user->uid);
$name = $account[variable_get('campaignmonitor_namekey', '')];
if ($user->uid != 0) {
$email = $user->mail;
if (_campaignmonitor_is_subscribed(variable_get('campaignmonitor_api_key', ''), variable_get('campaignmonitor_list_id', ''), $email)) {
$default = TRUE;
// Also if subscribed get name
$subscriber = _campaignmonitor_get_subscriber(variable_get('campaignmonitor_api_key', ''), variable_get('campaignmonitor_list_id', ''), $email);
$name = $subscriber['name'];
}
else {
$default = FALSE;
}
}
$block_options = variable_get('campaignmonitor_block_options', '');
if (!$block_options['name_hide']) {
$required = FALSE;
if ($block_options['name_required']) {
$required = TRUE;
}
$form['name'] = array(
'#type' => 'textfield',
'#title' => t('Name'),
'#size' => 20,
'#maxlength' => 50,
'#required' => $required,
'#default_value' => $name,
);
}
$form['email'] = array(
'#type' => 'textfield',
'#title' => t('Email'),
'#size' => 20,
'#maxlength' => 100,
'#required' => TRUE,
'#default_value' => $email,
);
if (!$block_options['unsubscribe']) {
$form['unsubscribe_newsletter'] = array(
'#type' => 'checkbox',
'#title' => t('Unsubscribe'),
'#default_value' => $default,
);
}
$form['submit'] = array(
'#type' => 'submit',
'#value' => t('Submit'),
);
return $form;
}