Commit c4f24da7 authored by Simon Leinen's avatar Simon Leinen

Added cross-link to load graphs page

parent 69521876
......@@ -8,7 +8,8 @@ sub write_reports($@);
my $DIR = '/var/www/html/reports';
my $script_url = 'https://gitlab.leinen.ch/leinen/usage-report/blob/master/generate-summary.pl';
my $gitlab_root = 'https://gitlab.leinen.ch/leinen/usage-report';
my $script_url = $gitlab_root.'/blob/master/generate-summary.pl';
chdir($DIR) or die "Cannot cd to $DIR: $!";
......@@ -70,6 +71,7 @@ sub write_reports($@) {
my $count = 0;
my $nreports = 50;
printf OUT ("<!DOCTYPE html>\n<html>\n <head>\n");
printf OUT (" <title>SWITCHengines Usage Reports</title>\n");
printf OUT (" <link rel=\"stylesheet\" type=\"text/css\" href=\"css/report.css\" />\n");
printf OUT (" </head>\n<body>\n <h1>SWITCHengines Usage Reports</h1>\n <table>\n");
printf OUT (" <tr><th rowspan='2'>Report</th>");
......@@ -104,6 +106,7 @@ sub write_reports($@) {
last if ++$count >= $nreports;
}
printf OUT (" </table>\n");
printf OUT (" <address>Generated by <a href=\"$script_url\">generate-summary.pl</a></address>\n");
printf OUT (" <address>Generated by <a href=\"$script_url\">generate-summary.pl</a><br/>\n");
printf OUT (" Also check out our beautiful <a href=\"../load.html\">load graphs</a></address>\n");
printf OUT (" </table>\n </body>\n</html>\n");
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment