ProPeace/de.systopia.twingle
6
0
Fork 0
Code Issues 2 Pull requests Projects 1 Releases Packages Wiki Activity Actions

implement CiviCRM's double opt-in feature for newsletter

Browse source
This commit is contained in:
Marc Michalsky 2020-07-24 10:57:14 +02:00
parent 675b682e0e
commit 4ff060884a
No known key found for this signature in database
GPG key ID: AC2D4E00990A6767
6 changed files with 67 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

43
CRM/Twingle/Form/Profile.php
View file

@ -327,11 +327,19 @@ class CRM_Twingle_Form_Profile extends CRM_Core_Form {
);
}
$this->add(
'checkbox', // field type
'double_opt_in', // field name
E::ts('Use Double-Opt-In for newsletter'), // field label
FALSE, // is not required
array()
);
$this->add(
'select', // field type
'newsletter_groups', // field name
E::ts('Sign up for newsletter groups'), // field label
static::getNewsletterGroups(), // list of options
static::getNewsletterGroups($this->profile->getAttribute('double_opt_in')), // list of options
FALSE, // is not required
array('class' => 'crm-select2 huge', 'multiple' => 'multiple')
);
@ -548,6 +556,7 @@ class CRM_Twingle_Form_Profile extends CRM_Core_Form {
$values['name'] = 'default';
}
$this->profile->setName($values['name']);
$this->profile->setAttribute('double_opt_in', isset($values['double_opt_in']));
foreach ($this->profile->getData() as $element_name => $value) {
if (isset($values[$element_name])) {
$this->profile->setAttribute($element_name, $values[$element_name]);
@ -791,15 +800,16 @@ class CRM_Twingle_Form_Profile extends CRM_Core_Form {
return self::$_contributionStatusOptions;
}
/**
* Retrieves active groups used as mailing lists within the system as options
* for select form elements.
*
* @return array
*
* @throws \CiviCRM_API3_Exception
*/
public static function getNewsletterGroups() {
/**
* Retrieves active groups used as mailing lists within the system as options
* for select form elements.
*
* @param $double_opt_in
*
* @return array
*
*/
public static function getNewsletterGroups($double_opt_in) {
if (!isset(static::$_newsletterGroups)) {
static::$_newsletterGroups = array();
$group_types = civicrm_api3('OptionValue', 'get', array(
@ -807,7 +817,18 @@ class CRM_Twingle_Form_Profile extends CRM_Core_Form {
'option_group_id' => 'group_type',
'name' => CRM_Twingle_Submission::GROUP_TYPE_NEWSLETTER,
));
if ($group_types['count'] > 0) {
if ($group_types['count'] > 0 && $double_opt_in) {
$query = civicrm_api3('Group', 'get', array(
'is_active' => 1,
'group_type' => "Mailing List",
'option.limit' => 0,
'visibility' => 'Public Pages',
'return' => 'id,name'
));
foreach ($query['values'] as $group) {
static::$_newsletterGroups[$group['id']] = $group['name'];
}
} elseif ($group_types['count'] > 0) {
$group_type = reset($group_types['values']);
$query = civicrm_api3('Group', 'get', array(
'is_active' => 1,