[Commits] [svn:einsteintoolkit] www/release-info/ (Rev. 201)
knarf at cct.lsu.edu
knarf at cct.lsu.edu
Mon Jun 14 08:46:12 CDT 2010
User: knarf
Date: 2010/06/14 08:46 AM
Modified:
/release-info/
parse_testsuite_results.cgi, parse_testsuite_results.php
Log:
use web site layout
File Changes:
Directory: /release-info/
=========================
File [modified]: parse_testsuite_results.cgi
Delta lines: +2 -7
===================================================================
--- release-info/parse_testsuite_results.cgi 2010-06-14 03:41:52 UTC (rev 200)
+++ release-info/parse_testsuite_results.cgi 2010-06-14 13:46:12 UTC (rev 201)
@@ -1,12 +1,7 @@
#!/usr/bin/perl -w
use strict;
-use CGI;
-use CGI::Carp qw ( fatalsToBrowser );
use Data::Dumper;
-my $query = new CGI;
-print $query->header();
-
my @filenames = ();
opendir(DIR, ".") || die "cannot open dir: $!";
foreach (sort readdir(DIR)) {
@@ -104,7 +99,7 @@
if (defined($results{$thorn}{$test}{$host}) and
defined($results{$thorn}{$test}{$host}{$nprocs})) {
if ($results{$thorn}{$test}{$host}{$nprocs}{"result"} =~ /Success/) {
- $table_entries .= "<td align='center'>.</td>";
+ $table_entries .= "<td align='center'>â</td>";
} else {
my $details = $results{$thorn}{$test}{$host}{$nprocs}{"details"};
my $entry = "<b>$details</b>";
@@ -125,4 +120,4 @@
}
}
-print "<html><body><table border='1'>$table_entries</table></body></html>\n";
+print "<table border='1'>$table_entries</table>\n";
File [modified]: parse_testsuite_results.php
Delta lines: +6 -1
===================================================================
--- release-info/parse_testsuite_results.php 2010-06-14 03:41:52 UTC (rev 200)
+++ release-info/parse_testsuite_results.php 2010-06-14 13:46:12 UTC (rev 201)
@@ -1,7 +1,12 @@
-<?php
+<?php $title='Testsuite status of einsteintoolkit.th';
+$hide_path=1;
+include_once($_SERVER['DOCUMENT_ROOT'].'/global/header.php');
+
exec('./parse_testsuite_results.cgi', $output = array());
foreach ($output as $line) {
echo $line."\n";
}
+
+include_once($_SERVER['DOCUMENT_ROOT'].'/global/footer.php');
?>
More information about the Commits
mailing list