loncom/publisher/lonretrieve.pm - diff

Return to lonretrieve.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.28, 2005/12/12 21:59:12	version 1.29, 2006/01/31 22:37:04
Line 95 sub phaseone {	Line 95 sub phaseone {
closedir(DIR);	closedir(DIR);
my $rmtime=&Apache::lonnet::metadata($resfn,'lastrevisiondate');	my $rmtime=&Apache::lonnet::metadata($resfn,'lastrevisiondate');
$r->print('<tr><td><input type=radio name=version value="new"></td>'.	$r->print('<tr><td><input type=radio name=version value="new"></td>'.
'<th>'.&mt('Currently public version').'</th><td>'.localtime($rmtime).	'<th>'.&mt('Currently published version').'</th><td>'.localtime($rmtime).
'</td><td><a href="'.$urldir.$main.'.'.$suffix.'.meta" target=cat>'.	'</td><td><a href="'.$urldir.$main.'.'.$suffix.'.meta" target=cat>'.
&mt('Metadata current version').'</a>');	&mt('Metadata current version').'</a>');
if (&Apache::loncommon::fileembstyle($suffix) eq 'ssi') {	if (&Apache::loncommon::fileembstyle($suffix) eq 'ssi') {