version 1.365, 2012/08/21 15:43:27
|
version 1.366, 2012/10/02 18:08:12
|
Line 4259 sub handler {
|
Line 4259 sub handler {
|
if ($env{'form.phase'} eq 'createnewuser') { |
if ($env{'form.phase'} eq 'createnewuser') { |
my $response; |
my $response; |
if ($env{'form.srchterm'} !~ /^$match_username$/) { |
if ($env{'form.srchterm'} !~ /^$match_username$/) { |
my $response = &mt('You must specify a valid username. Only the following are allowed: letters numbers - . @'); |
my $response = |
|
'<span class="LC_warning">' |
|
.&mt('You must specify a valid username. Only the following are allowed:' |
|
.' letters numbers - . @') |
|
.'</span>'; |
$env{'form.phase'} = ''; |
$env{'form.phase'} = ''; |
&print_username_entry_form($r,$context,$response,$srch,undef,$crstype,$brcrum); |
&print_username_entry_form($r,$context,$response,$srch,undef,$crstype,$brcrum); |
} else { |
} else { |
Line 6933 sub update_selfenroll_config {
|
Line 6937 sub update_selfenroll_config {
|
my ($visible,$cansetvis,$vismsgs,$visactions) = &visible_in_cat($cdom,$cnum); |
my ($visible,$cansetvis,$vismsgs,$visactions) = &visible_in_cat($cdom,$cnum); |
if (ref($visactions) eq 'HASH') { |
if (ref($visactions) eq 'HASH') { |
if (!$visible) { |
if (!$visible) { |
$r->print('<br />'.$visactions->{'miss'}.'<br />'.$visactions->{'yous'}. |
$r->print('<br /><span class="LC_warning">'.$visactions->{'miss'}.'</span><br />'.$visactions->{'yous'}. |
'<br />'); |
'<br />'); |
if (ref($vismsgs) eq 'ARRAY') { |
if (ref($vismsgs) eq 'ARRAY') { |
$r->print('<br />'.$visactions->{'take'}.'<ul>'); |
$r->print('<br />'.$visactions->{'take'}.'<ul>'); |