From 5bb2cd976f00361e7da80bec4578a2d8aae3a436 Mon Sep 17 00:00:00 2001
From: Richard Tucker <rit@harlequin.com>
Date: Wed, 28 Oct 1998 17:16:00 +0000
Subject: [PATCH] Add test verdict to mail subject line

Copied from Perforce
 Change: 20287
 ServerID: perforce.ravenbrook.com
---
 mps/qa/test/script/commands/run | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/mps/qa/test/script/commands/run b/mps/qa/test/script/commands/run
index 5364e8dea05..a83c37f691d 100644
--- a/mps/qa/test/script/commands/run
+++ b/mps/qa/test/script/commands/run
@@ -1,5 +1,5 @@
 #!/usr/local/bin/perl
-# $HopeName: MMQA_harness!script:commands:run(trunk.2) $
+# $HopeName: MMQA_harness!script:commands:run(trunk.3) $
 #
 # run tests interactively (allows for user input, immediate results,
 # &c, and give results in standard format, and mailing results)
@@ -16,6 +16,7 @@ require "require";
 
 foreach $testfile (@qa_args) {
  &run_test($testfile, "yes", "results", "$LOG_DIR/last.log");
- &mailfile("$LOG_DIR/last.log", "MMQA-log: result of test $testfile");
+ &mailfile("$LOG_DIR/last.log",
+  "MMQA-log: ".$testconclusion."ED test $testfile");
 }