loncom/publisher/lonretrieve.pm - diff

Return to lonretrieve.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.7, 2001/05/02 20:34:34	version 1.8, 2001/05/02 21:35:15
Line 11	Line 11
# 03/23 Guy Albertelli	# 03/23 Guy Albertelli
# 03/24,03/29 Gerd Kortemeyer)	# 03/24,03/29 Gerd Kortemeyer)
#	#
# 03/31,04/03 Gerd Kortemeyer	# 03/31,04/03,05/02 Gerd Kortemeyer

package Apache::lonretrieve;	package Apache::lonretrieve;

Line 55 sub phaseone {	Line 55 sub phaseone {
$version.'"></td><th>'.$version.'</th><td>'.	$version.'"></td><th>'.$version.'</th><td>'.
localtime($rmtime).'</td><td>'.	localtime($rmtime).'</td><td>'.
'<a href="'.$urldir.$filename.'.meta" target=cat>'.	'<a href="'.$urldir.$filename.'.meta" target=cat>'.
'Metadata Version '.$version.'</a></td></tr>');	'Metadata Version '.$version);
	if (&Apache::lonnet::fileembstyle($suffix) eq 'ssi') {
	$r->print(
	'  <a target=cat href="/adm/diff?filename='.$fn.
	'&versionone=priv&versiontwo='.$version.
	'">Diffs with Version '.$version.'</a>');
	}
	$r->print('</a></td></tr>');
}	}
}	}
closedir(DIR);	closedir(DIR);