--- a/StandardSystemView.st Mon Dec 18 20:30:34 2000 +0100
+++ b/StandardSystemView.st Thu Dec 21 14:07:47 2000 +0100
@@ -1296,12 +1296,12 @@
super create.
iconView notNil ifTrue:[
- iconView create.
- device setWindowIconWindow:iconView in:drawableId.
- iconView setRealized:true.
+ iconView create.
+ device setWindowIconWindow:iconView in:drawableId.
+ iconView setRealized:true.
].
iconLabel notNil ifTrue:[
- device setIconName:iconLabel string in:drawableId
+ device setIconName:iconLabel string in:drawableId
]
"Modified: 10.6.1996 / 20:14:50 / cg"
@@ -1337,7 +1337,7 @@
physicalCreate
"common code for create & recreate"
- |l icn icnMask org listener ret|
+ |l icn icnMask listener ret|
l := self windowLabelFor:label.
@@ -1353,12 +1353,10 @@
"/ and provide another origin (by payching my origin via setOrigin:).
WindowSensor preViewCreateNotification:self.
- org := left @ top.
-
drawableId := device
createWindowFor:self
type:nil
- origin:org
+ origin:(left @ top)
extent:(width @ height)
minExtent:minExtent
maxExtent:maxExtent
@@ -1459,6 +1457,6 @@
!StandardSystemView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.136 2000-11-22 14:53:04 tm Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.137 2000-12-21 13:07:47 cg Exp $'
! !
StandardSystemView initialize!