loncom/interface/lonsyllabus.pm - diff

Return to lonsyllabus.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.25, 2003/10/04 20:49:40	version 1.26, 2004/01/15 04:46:36
Line 177 ENDDOCUMENT	Line 177 ENDDOCUMENT
if (($syllabus{'uploaded.lastmodified'}) \|\| ($allowed)) {	if (($syllabus{'uploaded.lastmodified'}) \|\| ($allowed)) {
my $lastmod=$syllabus{'uploaded.lastmodified'};	my $lastmod=$syllabus{'uploaded.lastmodified'};
$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));	$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));
	my $who = &Apache::loncommon::aboutmewrapper(
$r->print('<table><tr><td>'.&mt('Uploaded').':</td><td>'.	&Apache::loncommon::plainname($syllabus{'uploaded.name'},
&Apache::loncommon::aboutmewrapper(
&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>'.&mt('Last updated').':</td><td>'.	$r->print('<table><tr><td>'.&mt('Last updated').':</td><td>'.
$lastmod.	$lastmod.'</td><td>'.&mt('by').' '.$who.
'</td></tr></table><p>');	'</td></tr></table><p>');
if ($allowed) {	if ($allowed) {
$r->print('<form method="post">');	$r->print('<form method="post">');
}	}