version 1.3, 2008/05/14 20:06:51
|
version 1.5, 2008/06/23 15:52:52
|
Line 171 END
|
Line 171 END
|
$r->print('<li>'.&mt('Otherwise:').'<br />'); |
$r->print('<li>'.&mt('Otherwise:').'<br />'); |
my $count = 0; |
my $count = 0; |
foreach my $type ('sso','login','email') { |
foreach my $type ('sso','login','email') { |
if ($count> 0) { |
if (($count > 0) && ($count <@cancreate)) { |
$r->print(' , '.&mt('or').'<br />'); |
$r->print(' , '.&mt('or').'<br />'); |
} |
} |
if (grep(/^$type$/,@cancreate)) { |
if (grep(/^$type$/,@cancreate)) { |
Line 431 sub print_selfenroll_types {
|
Line 431 sub print_selfenroll_types {
|
} |
} |
} |
} |
} else { |
} else { |
$output = &mt('Self-enrollment in this course is only available to users in the following domains (with the following status): ').'<ul>'; |
$output = &mt('Self-enrollment in this course is only available to users in the following domains (with the following status):').' <ul>'; |
foreach my $selfdom (sort(keys(%{$longtypes}))) { |
foreach my $selfdom (sort(keys(%{$longtypes}))) { |
if (ref($longtypes->{$selfdom}) eq 'ARRAY') { |
if (ref($longtypes->{$selfdom}) eq 'ARRAY') { |
$output .= '<li>'.$selfdom.': '.join(', ',@{$longtypes->{$selfdom}}).'</li>'; |
$output .= '<li>'.$selfdom.': '.join(', ',@{$longtypes->{$selfdom}}).'</li>'; |
Line 440 sub print_selfenroll_types {
|
Line 440 sub print_selfenroll_types {
|
$output .= '</ul>'; |
$output .= '</ul>'; |
} |
} |
} else { |
} else { |
$output = &mt('Self-enrollment is not currently available in this course'); |
$output = &mt('Self-enrollment is not currently available for this course.'); |
} |
} |
} |
} |
return $output; |
return $output; |