--- a/StandardSystemView.st Wed Aug 18 16:28:59 1999 +0200
+++ b/StandardSystemView.st Wed Aug 18 16:34:20 1999 +0200
@@ -373,7 +373,7 @@
]
].
i notNil ifTrue:[
- DefaultIcon := i := i on:Display
+ DefaultIcon := i := i onDevice:Display
]
].
^ i
@@ -1480,6 +1480,6 @@
!StandardSystemView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.121 1999-07-09 15:07:11 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.122 1999-08-18 14:33:26 cg Exp $'
! !
StandardSystemView initialize!