loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.1322, 2018/11/06 15:37:37	version 1.1325, 2019/01/26 00:18:48
Line 13937 sub load_tmp_file {	Line 13937 sub load_tmp_file {

sub valid_datatoken {	sub valid_datatoken {
my ($datatoken) = @_;	my ($datatoken) = @_;
if ($datatoken =~ /^$match_username\_$match_domain\_enroll_$match_domain\_$match_courseid\_\d+_\d+$/) {	if ($datatoken =~ /^$match_username\_$match_domain\_enroll_(\|$match_domain\_$match_courseid)\_\d+_\d+$/) {
return $datatoken;	return $datatoken;
}	}
return;	return;
Line 16425 sub lon_status_items {	Line 16425 sub lon_status_items {
E => 100,	E => 100,
W => 4,	W => 4,
N => 1,	N => 1,
	U => 5,
threshold => 200,	threshold => 200,
sysmail => 2500,	sysmail => 2500,
);	);
Line 16432 sub lon_status_items {	Line 16433 sub lon_status_items {
E => 'Errors',	E => 'Errors',
W => 'Warnings',	W => 'Warnings',
N => 'Notices',	N => 'Notices',
	U => 'Unsent',
);	);
return (\%defaults,\%names);	return (\%defaults,\%names);
}	}
Line 17799 sub create_captcha {	Line 17801 sub create_captcha {
last;	last;
}	}
}	}
	if ($output eq '') {
	&Apache::lonnet::logthis("Failed to create Captcha code after $tries attempts.");
	}
return $output;	return $output;
}	}