loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.424, 2009/01/20 18:37:30	version 1.425, 2009/01/27 15:59:30
Line 2294 sub crsenv {	Line 2294 sub crsenv {
my ($name,$domain) = split(':',$user);	my ($name,$domain) = split(':',$user);
if (!defined($user) \|\| !defined($domain)) {	if (!defined($user) \|\| !defined($domain)) {
$setoutput.= '<br /> <span class="LC_error">'.	$setoutput.= '<br /> <span class="LC_error">'.
&mt("Invalid email address specified, address must be of the form username:domain what was specified was ([_1])",$user).	&mt("Invalid e-mail address specified, address must be of the form username:domain what was specified was ([_1])",$user).
'</span>';	'</span>';
undef($value);	undef($value);
} elsif (&Apache::lonnet::homeserver($user,$domain) eq 'no_host') {	} elsif (&Apache::lonnet::homeserver($user,$domain) eq 'no_host') {
$setoutput.= '<br /> <span class="LC_error">'.	$setoutput.= '<br /> <span class="LC_error">'.
&mt("Invalid email address specified, user [_1] is unknown.",$name).	&mt("Invalid e-mail address specified, user [_1] is unknown.",$name).
'</span>';	'</span>';
undef($value);	undef($value);
}	}