loncom/interface/lonsyllabus.pm - diff

Return to lonsyllabus.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.7, 2002/08/28 14:11:27	version 1.8, 2002/09/13 19:40:48
Line 115 ENDDOCUMENT	Line 115 ENDDOCUMENT
}	}
# ---------------------------------------------------------------- Get syllabus	# ---------------------------------------------------------------- Get syllabus
if (($syllabus{'uploaded.lastmodified'}) \|\| ($allowed)) {	if (($syllabus{'uploaded.lastmodified'}) \|\| ($allowed)) {
	my $lastmod=$syllabus{'uploaded.lastmodified'};
	$lastmod=($lastmod?localtime($lastmod):'never');

$r->print('<table><tr><td>Uploaded:</td><td>'.	$r->print('<table><tr><td>Uploaded:</td><td>'.
&Apache::loncommon::aboutmewrapper(	&Apache::loncommon::aboutmewrapper(
&Apache::loncommon::plainname($syllabus{'uploaded.name'},	&Apache::loncommon::plainname($syllabus{'uploaded.name'},
$syllabus{'uploaded.domain'}),$syllabus{'uploaded.name'},	$syllabus{'uploaded.domain'}),$syllabus{'uploaded.name'},
$syllabus{'uploaded.domain'}).	$syllabus{'uploaded.domain'}).
'</td></tr><tr><td>Last updated</td><td>'.	'</td></tr><tr><td>Last updated:</td><td>'.
localtime($syllabus{'uploaded.lastmodified'}).	$lastmod.
'</td></tr></table><p>');	'</td></tr></table><p>');
if ($allowed) {	if ($allowed) {
$r->print('<form method="post">');	$r->print('<form method="post">');