diff --git a/sbin/install_newsletter.pl b/sbin/install_newsletter.pl index 00653a6..9999e6c 100644 --- a/sbin/install_newsletter.pl +++ b/sbin/install_newsletter.pl @@ -12,6 +12,7 @@ use strict; use Pod::Usage; use Getopt::Long; use WebGUI::Session; +use List::MoreUtils qw{ insert_after_string }; # Get parameters here, including $help GetOptions( @@ -26,6 +27,7 @@ installNewsletterCollection( $session ); installMailingTables( $session ); installNewsletterInAdminConsole( $session ); installNewsletterSettings( $session ); +addPluginsToConfigFile( $session ); finish($session); @@ -147,6 +149,26 @@ sub installNewsletterSettings { print "Done.\n"; } +#---------------------------------------------------------------------------- +sub addPluginsToConfigFile { + my $session = shift; + my $config = $session->config; + + print "\tAdding plugins to config file..."; + + $config->set( 'assets/WebGUI::Asset::Wobject::NewsletterCollection', { + category => 'basic', + } ); + + my @handlers = @{ $session->config->get('contentHandlers') }; + if ( !grep { $_ eq 'WebGUI::Content::NewsletterManager' } @handlers ) { + insert_after_string 'WebGUI::Content::Shop', 'WebGUI::Content::NewsletterManager', @handlers; + $session->config->set( 'contentHandlers', \@handlers ); + } + + print "Done.\n"; +} + #---------------------------------------------------------------------------- sub start { my $webguiRoot = shift; diff --git a/sbin/packages/root_import_personalnewsletter.wgpkg b/sbin/packages/root_import_personalnewsletter.wgpkg index bdfe09b..8e8e9c3 100644 Binary files a/sbin/packages/root_import_personalnewsletter.wgpkg and b/sbin/packages/root_import_personalnewsletter.wgpkg differ