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

Adding nl settings screen

Browse source
This commit is contained in:
Martin Kamerbeek 2010-05-12 18:55:17 +02:00
parent a9321d32da
commit ef172e2228
4 changed files with 172 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

12
sbin/install_newsletter.pl
View file

@ -24,6 +24,7 @@ installMailableAspectTable( $session );
installNewsletterCollection( $session );
installMailingTables( $session );
installNewsletterInAdminConsole( $session );
installNewsletterSettings( $session );
finish($session);
@ -103,6 +104,17 @@ sub installNewsletterInAdminConsole {
print "Done.\n";
}
#----------------------------------------------------------------------------
sub installNewsletterSettings {
my $session = shift;
my $setting = $session->setting;
print "\tInstalling newsletter setting slots...";
$setting->add( 'newsletterReturnDomain', undef ) unless $setting->has( 'newsletterReturnDomain' );
print "Done.\n";
}
#----------------------------------------------------------------------------
sub start {