UnitedKnowledge/webgui_newsletter
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make mailing manager template settable en change namespace to Mailing/Manage.

Browse source
This commit is contained in:
Martin Kamerbeek 2010-06-03 10:51:07 +02:00
parent ee409b061d
commit 169d750b0e
5 changed files with 48 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lib/WebGUI/Mailing/Admin.pm
View file

@ -91,12 +91,19 @@ sub www_settings {
$f->text(
name => 'newsletterReturnDomain',
value => $setting->get( 'newsletterReturnDomain' ),
label => $i18n->get( 'Newsletter domain name' ),
label => $i18n->get( 'newsletter domain name' ),
);
$f->integer(
name => 'newsletterBounceScoreThreshold',
value => $setting->get( 'newsletterBounceScoreThreshold' ),
label => $i18n->get( 'Bounce score threshold' ),
label => $i18n->get( 'bounce score threshold' ),
);
$f->template(
name => 'mailingManagerTemplateId',
value => $setting->get( 'mailingManagerTemplateId' ),
defaultValue => 'FTfNhWI8KJOwLzFUl5rYeQ',
label => $i18n->get( 'manage mailings template' ),
namespace => 'Mailing/Manage',
);
$f->submit;
@ -111,8 +118,9 @@ sub www_settingsSave {
my ($setting, $form) = $session->quick( 'setting', 'form' );
$setting->set( 'newsletterReturnDomain', $form->get('newsletterReturnDomain') );
$setting->set( 'newsletterBounceScoreThreshold', $form->integer('newsletterBounceScoreThreshold') );
$setting->set( 'newsletterReturnDomain', $form->get('newsletterReturnDomain') );
$setting->set( 'newsletterBounceScoreThreshold', $form->integer('newsletterBounceScoreThreshold') );
$setting->set( 'mailingManagerTemplateId', $form->template('mailingManagerTemplateId') );
return $self->www_settings;
}
@ -122,6 +130,7 @@ sub www_view {
my $self = shift;
my $session = $self->session;
my $url = $session->url;
my $setting = $session->setting;
my $i18n = WebGUI::International->new( $session, 'MailingManager' );
return $self->www_settings unless $self->configurationComplete;
@ -162,7 +171,7 @@ sub www_view {
my $var = { newsletter_loop => \@newsletterLoop };
my $template = WebGUI::Asset::Template->new( $self->session, 'FTfNhWI8KJOwLzFUl5rYeQ' );
my $template = WebGUI::Asset::Template->new( $session, $setting->get('mailingManagerTemplateId') );
return $self->getAdminConsole->render( $template->process( $var ), $i18n->get( 'manage mailings' ) );
}