--- a/Launcher.st	Fri Nov 24 11:31:36 1995 +0100
+++ b/Launcher.st	Fri Nov 24 11:59:48 1995 +0100
@@ -36,7 +36,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.51 1995-11-22 16:45:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.52 1995-11-24 10:59:48 cg Exp $'
 !
 
 documentation
@@ -169,7 +169,7 @@
     |top icn w|
 
     top := StandardSystemView new.
-    top label:'Smalltalk/X'.
+    top label:'Smalltalk/X'; iconLabel:'ST/X Launcher'.
     top extent:(400@300 ).
 
     "