15 lines
395 B
Perl
15 lines
395 B
Perl
|
|
use WebGUI::Upgrade::Script;
|
|
use List::MoreUtils qw( any );
|
|
|
|
start_step "Adding new Admin Console";
|
|
|
|
session->config->addToArrayAfter(
|
|
'contentHandlers', 'WebGUI::Content::Referral', 'WebGUI::Content::Admin'
|
|
);
|
|
|
|
# Remove irrelevant Admin Console items
|
|
session->config->deleteFromHash( 'adminConsole', 'adminConsoleOff' );
|
|
session->config->deleteFromHash( 'adminConsole', 'assets' );
|
|
|
|
done;
|