--- a/Tools__TestRunnerMini.st	Thu Jul 25 12:59:38 2019 +0200
+++ b/Tools__TestRunnerMini.st	Thu Jul 25 12:59:50 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  Copyright (c) 2007-2010 Jan Vrany, SWING Research Group, Czech Technical University in Prague
  Copyright (c) 2009-2010 eXept Software AG
@@ -613,7 +615,7 @@
     runner allButOpen.
 
     screen := Screen current.
-    (screen notNil and:[ screen platformName == #X11 ]) ifTrue:[ 
+    (screen notNil and:[ screen isX11Platform ]) ifTrue:[ 
         "/ Use EWMH hint to tell the WM that the window is
         "/ a sort of floating tool so WM can decorate it according to
         "/ DE standards.
@@ -625,7 +627,7 @@
     runner open.
 
     "Modified: / 23-09-2014 / 12:05:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified (comment): / 27-03-2019 / 16:11:21 / Claus Gittinger"
+    "Modified: / 25-07-2019 / 12:32:39 / Claus Gittinger"
 !
 
 run