--- a/Launcher.st Thu Jul 25 20:26:20 1996 +0200
+++ b/Launcher.st Thu Jul 25 21:12:32 1996 +0200
@@ -2410,7 +2410,9 @@
top extent:(400@300 ).
icn := self class aboutIcon.
- icn := icn magnifiedTo:(sz := Screen current preferredIconSize).
+ icn notNil ifTrue:[
+ icn := icn magnifiedTo:(sz := Screen current preferredIconSize).
+ ].
((scrn := Screen current) supportsDeepIcons not
and:[scrn supportsIconViews
@@ -2457,7 +2459,7 @@
].
OpenLaunchers add:self.
- "Modified: 5.7.1996 / 17:55:22 / cg"
+ "Modified: 25.7.1996 / 21:12:09 / cg"
!
release
@@ -3311,5 +3313,5 @@
!NewLauncher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.173 1996-07-18 11:10:01 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.174 1996-07-25 19:12:32 cg Exp $'
! !