Enable WebGUI sites to send SMS messages as inbox notifications.

This commit is contained in:
Colin Kuskie 2009-05-13 21:55:33 +00:00
commit f54e975c14
8 changed files with 303 additions and 18 deletions

View file

@ -31,6 +31,7 @@
- rfe #9907: Inbox: Notifications
- rfe #9134: Pluggable Storage to support Amazon S3 and Cloudfront
- Added PayPal paydriver. (Thanks to Paul Wrightson)
- rfe #9908: Inbox: SMS delivery
7.7.5
- Adding StoryManager.

View file

@ -39,6 +39,9 @@ addListingsCacheTimeoutToMatrix( $session );
addSurveyFeedbackTemplateColumn( $session );
installCopySender($session);
installNotificationsSettings($session);
installSMSUserProfileFields($session);
installSMSSettings($session);
upgradeSMSMailQueue($session);
addPayDrivers($session);
finish($session);
@ -163,6 +166,49 @@ sub installNotificationsSettings {
$session->setting->add('inboxNotificationTemplateId', 'b1316COmd9xRv4fCI3LLGA');
}
<<<<<<< .mine
sub installSMSUserProfileFields {
my $session = shift;
WebGUI::ProfileField->create(
$session,
'receiveInboxEmailNotifications',
{
label => q!WebGUI::International::get('receive inbox emails','Message_Center')!,
visible => 1,
required => 0,
protected => 1,
editable => 1,
fieldType => 'yesNo',
dataDefault => 1,
},
4,
);
WebGUI::ProfileField->create(
$session,
'receiveInboxSmsNotifications',
{
label => q!WebGUI::International::get('receive inbox sms','Message_Center')!,
visible => 1,
required => 0,
protected => 1,
editable => 1,
fieldType => 'yesNo',
dataDefault => 0,
},
4,
);
}
sub installSMSSettings {
my $session = shift;
$session->setting->add('smsGateway', '');
}
sub upgradeSMSMailQueue {
my $session = shift;
$session->db->write('alter table mailQueue add column isInbox TINYINT(4) default 0');
}
#----------------------------------------------------------------------------
# Describe what our function does
sub addPayDrivers {