--- a/Launcher.st	Mon Jun 10 21:38:20 1996 +0200
+++ b/Launcher.st	Mon Jun 10 21:49:59 1996 +0200
@@ -2098,8 +2098,16 @@
     top extent:(400@300 ).
 
     icn := self class aboutIcon.
-    icn := icn magnifiedTo:(Screen current preferredIconSize).
-    top icon:icn.
+    icn := icn magnifiedTo:(sz := Screen current preferredIconSize).
+
+    ((scrn := Screen current) supportsDeepIcons not
+    and:[scrn supportsIconViews]) ifTrue:[    
+        w := View extent:sz. 
+        w viewBackground:icn.
+        top iconView:w
+    ] ifFalse:[
+        top icon:icn.
+    ].
 
 "/    (scrn := Screen current) supportsDeepIcons ifTrue:[
 "/        icn := self class aboutIcon.
@@ -2131,7 +2139,7 @@
     "
     top openWithPriority:(Processor userSchedulingPriority + 1).
 
-    "Modified: 10.6.1996 / 21:22:33 / cg"
+    "Modified: 10.6.1996 / 21:49:26 / cg"
 !
 
 release
@@ -2942,5 +2950,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.149 1996-06-10 19:38:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.150 1996-06-10 19:49:59 cg Exp $'
 ! !