--- a/AbstractLauncherApplication.st	Fri Jun 22 18:33:18 2001 +0200
+++ b/AbstractLauncherApplication.st	Fri Jun 22 18:38:35 2001 +0200
@@ -152,7 +152,7 @@
             ]
         ].
         cls isNil ifTrue:[
-            self warn:(resources string:'Sorry, the %1 class is not available.' with:classOrClassName).
+            self warn:(resources string:'Sorry, the ''%1''-class is not available.' with:classOrClassName).
             ^ nil
         ].
     ].
@@ -1220,7 +1220,7 @@
 startSUnitTestRunner
     "open the SUnit test runner"
 
-    self openApplication:TestRunner
+    self openApplication:#TestRunner
 
     "Modified: / 17.10.1998 / 14:38:18 / cg"
 ! !
@@ -6426,5 +6426,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.149 2001-06-22 16:28:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.150 2001-06-22 16:38:35 cg Exp $'
 ! !