Signed-off-by: Ian Campbell <ian.campb...@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
_______________________________________________
Xen-devel mailing list
Xen-devel@lists.xen.org
http://lists.xen.org/xen-devel
