--- a/Tools__TestRunnerMini.st	Thu Nov 24 22:03:16 2016 +0000
+++ b/Tools__TestRunnerMini.st	Thu Nov 24 22:14:31 2016 +0000
@@ -466,7 +466,9 @@
             ] 
         ] 
     ].
-    ^ methods
+    methods := methods asOrderedCollection.
+    methods sortBySelector:#selector.
+    ^ methods 
 
     "Created: / 15-03-2010 / 19:50:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 22-07-2011 / 15:53:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -1219,6 +1221,7 @@
         result notNil ifTrue:[
             self hasErrors ifTrue:[^AbstractTestRunner errorColor].
             self hasFailures ifTrue:[^AbstractTestRunner failedColor].
+            self hasSkipped ifTrue:[^AbstractTestRunner notRunColor]. 
             self hasPassed ifTrue:[
                 numTests := suite tests size.
                 numRun := result passedCount + result failureCount + result errorCount.
@@ -1334,6 +1337,11 @@
     ^result passedCount > 0
 
     "Created: / 15-03-2010 / 22:06:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+hasSkipped
+
+    ^result skippedCount > 0
 ! !
 
 !TestRunnerMini class methodsFor:'documentation'!