version 1.1, 2008/02/24 23:23:39
|
version 1.2, 2008/02/29 21:01:36
|
Line 73 sub handler {
|
Line 73 sub handler {
|
my %domconfig = &Apache::lonnet::get_dom('configuration',['usercreation'],$domain); |
my %domconfig = &Apache::lonnet::get_dom('configuration',['usercreation'],$domain); |
if (ref($domconfig{'usercreation'}) eq 'HASH') { |
if (ref($domconfig{'usercreation'}) eq 'HASH') { |
if (ref($domconfig{'usercreation'}{'cancreate'}) eq 'HASH') { |
if (ref($domconfig{'usercreation'}{'cancreate'}) eq 'HASH') { |
if ($domconfig{'usercreation'}{'cancreate'}{'selfenroll'} ne 'none') { |
if ($domconfig{'usercreation'}{'cancreate'}{'selfcreate'} ne 'none') { |
$cancreate = $domconfig{'usercreation'}{'cancreate'}{'selfenroll'}; |
$cancreate = $domconfig{'usercreation'}{'cancreate'}{'selfcreate'}; |
} |
} |
} |
} |
} |
} |
Line 754 sub guest_format_check {
|
Line 754 sub guest_format_check {
|
if (@user_rules > 0) { |
if (@user_rules > 0) { |
my %rule_check = |
my %rule_check = |
&Apache::lonnet::inst_rulecheck($domain,$useremail,undef, |
&Apache::lonnet::inst_rulecheck($domain,$useremail,undef, |
'selfenroll',\@user_rules); |
'selfcreate',\@user_rules); |
if (keys(%rule_check) > 0) { |
if (keys(%rule_check) > 0) { |
foreach my $item (keys(%rule_check)) { |
foreach my $item (keys(%rule_check)) { |
if ($rule_check{$item}) { |
if ($rule_check{$item}) { |