[PATCH OSSTEST 4/4] ms-queuedaemon: Call ms-flights-summary upon completed plan/projection

[Ian Campbell <ian.campbell@citrix.com>]

Signed-off-by: Ian Campbell <ian.campbell@citrix.com>
---
 ms-queuedaemon | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/ms-queuedaemon b/ms-queuedaemon
index 9c7645d..6ae9677 100755
--- a/ms-queuedaemon
+++ b/ms-queuedaemon
@@ -310,7 +310,20 @@ proc report-plan {w wo} {
 }
 
 proc report-projection {w} {
+    global c
+
     report-plan $w projection
+
+    # report-plan will have ensured data-projection.final.pl is up to
+    # date
+
+    catching-internally "producing summary" {
+	set proj "data-projection.final.pl"
+	set outputfile "$c(WebspaceFile)/summary.html"
+	exec ./ms-flights-summary $proj > $outputfile
+    } {
+	log "$w report-projection OK"
+    }
 }
 
 proc we-are-thinking {chan} {
-- 
2.5.1