CVS-Metrics
view release on metacpan or search on metacpan
bin/cgi_cvs_evolq view on Meta::CPAN
}
}
#######################################################################
sub GenerateHTML {
my ($title, $r_tags, $r_dirs) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<meta name='robots' content='nofollow' />
<title>cvs_evol <!-- TMPL_VAR NAME=title --></title>
<style type='text/css'>
<!-- TMPL_VAR NAME=style -->
</style>
bin/cgi_cvs_evolr view on Meta::CPAN
}
}
#######################################################################
sub GenerateHTML {
my ($cvs_log, $tags, $title, $path, $tag_from, $tag_to, $start_date) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<meta name='robots' content='nofollow' />
<title>cvs_evol <!-- TMPL_VAR NAME=title --></title>
<style type='text/css'>
<!-- TMPL_VAR NAME=style -->
</style>
bin/cgi_cvs_evolr view on Meta::CPAN
-type => 'text/html',
);
print $template->output();
}
sub GenerateError {
my ($title, $message) = @_;
my $error = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_evol <!-- TMPL_VAR NAME=title --></title>
<style type='text/css'>
<!-- TMPL_VAR NAME=style -->
</style>
</head>
bin/cvs_activity view on Meta::CPAN
}
}
#######################################################################
sub GenerateHTML {
my ($output, $title, @dirs) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_activity <!-- TMPL_VAR NAME=title --></title>
<style type='text/css'>
h1 {text-align: center}
</style>
</head>
bin/cvs_current view on Meta::CPAN
}
}
#######################################################################
sub GenerateHTML {
my ($cvs_log, $tags, $title, $path, $tag_from, $tag_to, $flg_css, $start_date, $output) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_current <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_current.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
bin/cvs_current view on Meta::CPAN
}
return $basename;
}
sub GenerateBranchHTML {
my ($cvs_log, $branch, $title, $path, $flg_css, $output) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_current <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_current.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
bin/cvs_current view on Meta::CPAN
close $OUT;
return $basename;
}
sub GenerateSummary {
my ($title, $flg_css, $r_html, $r_html2, $output) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_current <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_current.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
bin/cvs_energy view on Meta::CPAN
}
}
#######################################################################
sub GenerateHTML {
my ($output, $title, @dirs) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_energy <!-- TMPL_VAR NAME=title --></title>
<style type='text/css'>
h1 {text-align: center}
</style>
</head>
bin/cvs_revbytag view on Meta::CPAN
}
}
}
print $CSV "\n";
}
}
close $CSV;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_revbytag <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_revbytag.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
bin/cvs_revbytag view on Meta::CPAN
}
return $basename;
}
sub GenerateSummary {
my ($title, $flg_css, $r_html, $output) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_revbytag <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_revbytag.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
bin/cvs_tklog view on Meta::CPAN
}
}
#######################################################################
sub GenerateHTML {
my ($cvs_log, $tags, $title, $path, $tag_from, $tag_to, $flg_css, $start_date, $output) = @_;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_tklog <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_tklog.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
bin/cvs_wxlog view on Meta::CPAN
my $title = ($self->{path} eq '.') ? $self->{title} : $self->{path};
my $gd = $self->{cvs_log}->EnergyGD($self->{tags}, $self->{path}, $title, 600, 400);
return $gd;
}
sub GenerateHTML {
my $self = shift;
my $html = q{
<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' />
<meta name='generator' content='<TMPL_VAR NAME=generator>' />
<meta name='date' content='<TMPL_VAR NAME=date>' />
<title>cvs_wxlog <!-- TMPL_VAR NAME=title --></title>
<!-- TMPL_IF NAME=css -->
<link href='cvs_wxlog.css' rel='stylesheet' type='text/css'/>
<!-- TMPL_ELSE -->
<style type='text/css'>
( run in 0.655 second using v1.01-cache-2.11-cpan-49f99fa48dc )