Added new setting - Enable Users after Anonymous Registration?

This commit is contained in:
Paul Driver 2011-07-25 14:04:40 -05:00
parent 182fc16021
commit 7b1e385dd3
5 changed files with 50 additions and 8 deletions

View file

@ -30,6 +30,7 @@ my $quiet; # this line required
my $session = start(); # this line required
addWaitForConfirmationWorkflow($session);
addCreateUsersEnabledSetting($session);
finish($session); # this line required
@ -46,6 +47,17 @@ sub addWaitForConfirmationWorkflow {
}
}
#----------------------------------------------------------------------------
sub addCreateUsersEnabledSetting {
my $session = shift;
my $s = $session->setting;
my $name = 'enableUsersAfterAnonymousRegistration';
return if $s->has($name);
print "Adding $name setting..." unless $quiet;
$s->add($name => 1);
print "Done!\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
#sub exampleFunction {