--- a/Tools__TestRunnerEmbedded.st	Wed Nov 02 01:50:24 2016 +0100
+++ b/Tools__TestRunnerEmbedded.st	Wed Nov 02 01:50:34 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "{ Package: 'stx:libtool' }"
 
 "{ NameSpace: Tools }"
@@ -235,7 +233,8 @@
     classes addAll:((self selectedMethodsHolder value ? #()) 
                     collect:[:mthd | mthd mclass ]
                     thenSelect:[:cls | self isTestCaseLike:cls ]).
-    allTestCases := classes asArray
+    allTestCases := classes asArray.
+    allTestCases sortBySelector:#name.
 
     "Created: / 11-03-2010 / 10:31:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 24-01-2012 / 22:09:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -344,10 +343,10 @@
 !TestRunnerEmbedded class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunnerEmbedded.st,v 1.45 2015-02-28 20:32:04 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunnerEmbedded.st,v 1.45 2015-02-28 20:32:04 cg Exp $'
+    ^ '$Header$'
 ! !