loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.46, 2002/11/25 16:05:56	version 1.46.2.1, 2003/03/19 21:54:32
Line 326 ENDHEADER	Line 326 ENDHEADER
}	}
my $tcourseid=$tdom.'_'.$trest;	my $tcourseid=$tdom.'_'.$trest;
if ($ENV{'course.'.$tcourseid.'.description'}) {	if ($ENV{'course.'.$tcourseid.'.description'}) {
$twhere=	$twhere=$ENV{'course.'.$tcourseid.'.description'};
&Apache::loncommon::syllabuswrapper($ENV{'course.'.$tcourseid.'.description'},	unless ($twhere eq 'Currently not available') {
$trest,$tdom);	$twhere.=' <font size="-2">'.
	&Apache::loncommon::syllabuswrapper('Syllabus',$trest,$tdom,$tfont).
	'</font>';
	}
} else {	} else {
my %newhash=Apache::lonnet::coursedescription	my %newhash=Apache::lonnet::coursedescription
($tcourseid);	($tcourseid);
if (%newhash) {	if (%newhash) {
$twhere=	$twhere=$newhash{'description'}.
&Apache::loncommon::syllabuswrapper($newhash{'description'},$trest,$tdom);	' <font size="-2">'.
	&Apache::loncommon::syllabuswrapper('Syllabus',$trest,$tdom,$tfont).
	'</font>';
} else {	} else {
$twhere='Currently not available';	$twhere='Currently not available';
$ENV{'course.'.$tcourseid.'.description'}=$twhere;	$ENV{'course.'.$tcourseid.'.description'}=$twhere;