loncom/interface/lonaboutme.pm - diff

Return to lonaboutme.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.6, 2002/09/13 20:46:09	version 1.9, 2002/12/30 14:10:58
Line 72 ENDDOCUMENT	Line 72 ENDDOCUMENT
$r->print('<h1>'.&Apache::loncommon::plainname($cnum,$cdom).'</h1>');	$r->print('<h1>'.&Apache::loncommon::plainname($cnum,$cdom).'</h1>');
if ($courseenv{'nickname'}) {	if ($courseenv{'nickname'}) {
$r->print(	$r->print(
'<h2>"'.&Apache::lonnet::unescape($courseenv{'nickname'}).	'<h2>"'.$courseenv{'nickname'}.
'"</h2>');	'"</h2>');
}	}
$r->print('<h3>'.$Apache::lonnet::domaindescription{$cdom}.'</h3>'.	$r->print('<h3>'.$Apache::lonnet::domaindescription{$cdom}.'</h3>'.
Line 153 ENDDOCUMENT	Line 153 ENDDOCUMENT
} else {	} else {
$r->print('<p>No personal information provided.</p>');	$r->print('<p>No personal information provided.</p>');
}	}
	if ($ENV{'request.course.id'}) {
	if (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) {
	$r->print('<hr /><h3>User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course</h3>Shared by course faculty and staff<br />');
	&Apache::lonmsg::disfacetoface($r,$cnum,$cdom);
	$r->print(&Apache::loncommon::noteswrapper('Add Records',$cnum,$cdom));
	}
	}
$r->print('</body></html>');	$r->print('</body></html>');
return OK;	return OK;
}	}