version 1.125.2.4, 2006/08/11 22:47:36
|
version 1.125.2.6, 2006/08/31 02:19:50
|
Line 320 sub print_user_modification_page {
|
Line 320 sub print_user_modification_page {
|
} |
} |
else { |
else { |
var coursename = "_$dcdom"+"_"+course+"_"+userrole |
var coursename = "_$dcdom"+"_"+course+"_"+userrole |
document.cu.elements[numcourse].name = "act"+coursename |
document.cu.act.name = "act"+coursename |
document.cu.elements[numcourse+5].name = "sec"+coursename |
document.cu.sec.value = section |
document.cu.elements[numcourse+5].value = section |
document.cu.sec.name = "sec"+coursename |
document.cu.elements[numcourse+7].name = "start"+coursename |
document.cu.start.name = "start"+coursename |
document.cu.elements[numcourse+8].name = "end"+coursename |
document.cu.end.name = "end"+coursename |
} |
} |
} |
} |
document.cu.submit(); |
document.cu.submit(); |
Line 604 END
|
Line 604 END
|
if ($area =~ /^\/(\w+)\/(\d\w+)/ ) { |
if ($area =~ /^\/(\w+)\/(\d\w+)/ ) { |
$class='Course'; |
$class='Course'; |
my ($coursedom,$coursedir) = ($1,$2); |
my ($coursedom,$coursedir) = ($1,$2); |
$sortkey.="\0$1"; |
$sortkey.="\0$coursedom"; |
# $1.'_'.$2 is the course id (eg. 103_12345abcef103l3). |
# $1.'_'.$2 is the course id (eg. 103_12345abcef103l3). |
my %coursedata= |
my %coursedata= |
&Apache::lonnet::coursedescription($1.'_'.$2); |
&Apache::lonnet::coursedescription($1.'_'.$2); |
Line 619 END
|
Line 619 END
|
$carea=&mt('Unavailable course').': '.$area; |
$carea=&mt('Unavailable course').': '.$area; |
$sortkey.="\0".&mt('Unavailable course').': '.$area; |
$sortkey.="\0".&mt('Unavailable course').': '.$area; |
} |
} |
|
$sortkey.="\0$coursedir"; |
$inccourses{$1.'_'.$2}=1; |
$inccourses{$1.'_'.$2}=1; |
if ((&Apache::lonnet::allowed('c'.$role_code,$1.'/'.$2)) || |
if ((&Apache::lonnet::allowed('c'.$role_code,$1.'/'.$2)) || |
(&Apache::lonnet::allowed('c'.$role_code,$ccdomain))) { |
(&Apache::lonnet::allowed('c'.$role_code,$ccdomain))) { |