loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.408, 2016/02/17 19:15:48	version 1.409, 2016/02/19 02:39:07
Line 2164 sub modify_login_block {	Line 2164 sub modify_login_block {

sub personal_data_display {	sub personal_data_display {
my ($ccuname,$ccdomain,$newuser,$context,$inst_results,$rolesarray,	my ($ccuname,$ccdomain,$newuser,$context,$inst_results,$rolesarray,
$now,$captchaform,$emailusername,$usertype) = @_;	$now,$captchaform,$emailusername,$usertype,$recaptchaversion) = @_;
my ($output,%userenv,%canmodify,%canmodify_status);	my ($output,%userenv,%canmodify,%canmodify_status);
my @userinfo = ('firstname','middlename','lastname','generation',	my @userinfo = ('firstname','middlename','lastname','generation',
'permanentemail','id');	'permanentemail','id');
Line 2352 sub personal_data_display {	Line 2352 sub personal_data_display {
if (($context eq 'selfcreate') && ($newuser eq 'email')) {	if (($context eq 'selfcreate') && ($newuser eq 'email')) {
if ($captchaform) {	if ($captchaform) {
$output .= &Apache::lonhtmlcommon::row_title($lt{'valid'},	$output .= &Apache::lonhtmlcommon::row_title($lt{'valid'},
'LC_pick_box_title')."\n".	'LC_pick_box_title')."\n";
$captchaform."\n".'<br /><br />'.	if ($recaptchaversion >=2) {
	$output .= '<script src="https://www.google.com/recaptcha/api.js"></script>'."\n";
	}
	$output .= $captchaform."\n".'<br /><br />'.
&Apache::lonhtmlcommon::row_closure(1);	&Apache::lonhtmlcommon::row_closure(1);
$rowcount ++;	$rowcount ++;
}	}