Sort the list of testsuite parameter files alphabetically in the menu.

This closes PR Cactus-757.


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

1 files changed, 2 insertions, 2 deletions

diff --git a/lib/sbin/Runtest.pl b/lib/sbin/Runtest.pl
index c436b00b..8e8e95e4 100644
--- a/lib/sbin/Runtest.pl
+++ b/lib/sbin/Runtest.pl
@@ -91,7 +91,7 @@ else
 {
   $command = &defprompt("Enter command to run executable"," ");
 }
-$tests = &defprompt("Run All tests or go to Menu","All");
+$tests = &defprompt("Run (A)ll tests or go to (M)enu","All");
 
 
 
@@ -125,7 +125,7 @@ else
       $thisdir = `pwd`;
       chop($thisdir);
       chdir "$T${sep}test" || die "Unable to chdir to $T${sep}test";
-      while ($file=<*.par>)
+      foreach $file (sort <*.par>)
       {
         $database{"\U$T TESTFILE\E"} = $file;
         push(@testfiles, $file);