sort output alphabetically (was unsorted)

git-svn-id: http://svn.cactuscode.org/flesh/trunk@4612 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 6 insertions, 6 deletions

diff --git a/lib/sbin/RunTestUtils.pl b/lib/sbin/RunTestUtils.pl
index 8d18dfc3..c6691e8f 100644
--- a/lib/sbin/RunTestUtils.pl
+++ b/lib/sbin/RunTestUtils.pl
@@ -642,9 +642,9 @@ sub WriteFullResults
 
   $message = "  Tests missed for lack of thorns:\n";
   $missingtests = 0;
-  foreach $thorn (split(' ',$testdata->{'THORNS'}))
+  foreach $thorn (sort split(' ',$testdata->{'THORNS'}))
   {
-    foreach $parfile (split(' ',$testdata->{"$thorn TESTS"}))
+    foreach $parfile (sort split(' ',$testdata->{"$thorn TESTS"}))
     {
       my $missing = $testdata->{"$thorn $parfile MISSING"};
       next unless ($missing);
@@ -659,9 +659,9 @@ sub WriteFullResults
   # Different number of processors required
   $message = "  Tests missed for different number of processors required:\n";
   $missingtests = 0;
-  foreach $thorn (split(' ',$testdata->{'THORNS'}))
+  foreach $thorn (sort split(' ',$testdata->{'THORNS'}))
   {
-    foreach $parfile (split(' ',$testdata->{"$thorn TESTS"}))
+    foreach $parfile (sort split(' ',$testdata->{"$thorn TESTS"}))
     {
       my $nprocs = $testdata->{"$thorn $parfile NPROCS"};
       next unless ($nprocs);
@@ -678,9 +678,9 @@ sub WriteFullResults
   $message =  "  Tests with different number of test files:\n\n";
 
   $extratests = 0;
-  foreach $thorn (split(" ",$testdata->{"RUNNABLETHORNS"}))
+  foreach $thorn (sort split(" ",$testdata->{"RUNNABLETHORNS"}))
   {
-    foreach $parfile (split(" ",$testdata->{"$thorn RUNNABLE"}))
+    foreach $parfile (sort split(" ",$testdata->{"$thorn RUNNABLE"}))
     {
       if ($rundata->{"$thorn $parfile NFILEEXTRA"}>0)
       {