version 1.498, 2006/12/28 02:50:20
|
version 1.500, 2007/01/15 18:04:12
|
Line 3344 sub bodytag {
|
Line 3344 sub bodytag {
|
my ($role,$realm) = split(/\./,$env{'request.role'},2); |
my ($role,$realm) = split(/\./,$env{'request.role'},2); |
if ($role eq 'ca') { |
if ($role eq 'ca') { |
my ($rdom,$rname) = ($realm =~ m{^/($match_domain)/($match_username)$}); |
my ($rdom,$rname) = ($realm =~ m{^/($match_domain)/($match_username)$}); |
$realm = &plainname($rname,$rdom).':'.$rdom; |
$realm = &plainname($rname,$rdom); |
} |
} |
# realm |
# realm |
if ($env{'request.course.id'}) { |
if ($env{'request.course.id'}) { |
Line 6129 sub store_settings {
|
Line 6129 sub store_settings {
|
} |
} |
|
|
sub restore_course_settings { |
sub restore_course_settings { |
return &return_settings($env{'request.course.id'},@_); |
return &restore_settings($env{'request.course.id'},@_); |
} |
} |
|
|
sub restore_settings { |
sub restore_settings { |