rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.149.2.4, 2020/05/02 21:28:08	version 1.149.2.5, 2021/12/14 22:52:33
Line 1200 sub mapcrumbs {	Line 1200 sub mapcrumbs {
# ---------------------------------------------------- Read map and all submaps	# ---------------------------------------------------- Read map and all submaps

sub readmap {	sub readmap {
my $short=shift;	my ($short,$critmsg_check) = @_;
$short=~s/^\///;	$short=~s/^\///;

# TODO: Hidden dependency on current user:	# TODO: Hidden dependency on current user:
Line 1437 sub readmap {	Line 1437 sub readmap {

# Depends on user must parameterize this as well..or separate as this is:	# Depends on user must parameterize this as well..or separate as this is:
# more part of determining what someone sees on entering a course?	# more part of determining what someone sees on entering a course?
	# When lonuserstate::readmap() is called from lonroles.pm, i.e.,
my @what=&Apache::lonnet::dump('critical',$env{'user.domain'},	# after selecting a role in a course, critical_redirect will be called,
$env{'user.name'});	# unless the course has a blocking event in effect, which suppresses
if ($what[0]) {	# critical message checking (users without evb priv).
if (($what[0] ne 'con_lost') && ($what[0]!~/^error\:/)) {	#
$retfurl='/adm/email?critical=display';
	if ($critmsg_check) {
	my ($redirect,$url) = &Apache::loncommon::critical_redirect();
	if ($redirect) {
	$retfurl = $url;
}	}
}	}
return ($retfurl,$errtext);	return ($retfurl,$errtext);
}	}