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

Add newsletter to admin console

Browse source
This commit is contained in:
Martin Kamerbeek 2010-05-12 14:28:45 +02:00
parent 12e6ba8735
commit a9321d32da
2 changed files with 29 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

18
sbin/install_newsletter.pl
View file

@ -23,9 +23,11 @@ my $session = start( $webguiRoot, $configFile );
installMailableAspectTable( $session );
installNewsletterCollection( $session );
installMailingTables( $session );
installNewsletterInAdminConsole( $session );
finish($session);
#----------------------------------------------------------------------------
sub installMailableAspectTable {
my $session = shift;
@ -85,6 +87,22 @@ sub installMailingTables {
print "Done\n";
}
#----------------------------------------------------------------------------
sub installNewsletterInAdminConsole {
my $session = shift;
print "\tAdding newsletter admin console section...";
$session->config->set( 'adminConsole/mailable', {
groupSetting => "admins",
icon => "newsletter.gif",
title => "Newsletter",
uiLevel => 7,
url => qq{^PageUrl("",newsletter=manage);},
} );
print "Done.\n";
}
#----------------------------------------------------------------------------
sub start {