loncom/cgi/lonversions.pl - diff

Return to lonversions.pl CVS log

Up to [LON-CAPA] / loncom / cgi

version 1.9, 2011/11/07 20:50:02	version 1.10, 2014/07/11 00:31:09
Line 74 sub print_versions {	Line 74 sub print_versions {
my ($londaemons,$lonlib,$londocroot,$lonincludes) = @_;	my ($londaemons,$lonlib,$londocroot,$lonincludes) = @_;
print '<html><body bgcolor="#FFFFFF"><h1>'.&Apache::lonlocal::mt('Handler Versions').'</h1>'.	print '<html><body bgcolor="#FFFFFF"><h1>'.&Apache::lonlocal::mt('Handler Versions').'</h1>'.
"<pre>\n";	"<pre>\n";
my $revtag = '';	my $revtag = ' ';
open (DFH, "grep '$revtag' $londaemons/* $lonlib/perl/Apache/.pm $lonlib/perl/LONCAPA/.pm $lonincludes/* $londocroot/res/adm/pages/* \|");	open (DFH, "grep '$revtag' $londaemons/* $lonlib/perl/Apache/.pm $lonlib/perl/LONCAPA/.pm $lonincludes/* $londocroot/res/adm/pages/* \|");
while (my $line=<DFH>) {	while (my $line=<DFH>) {
chomp($line);	chomp($line);