--- a/DisplayObject.st Mon Jan 27 16:46:07 2003 +0100
+++ b/DisplayObject.st Thu Jan 30 09:57:35 2003 +0100
@@ -156,7 +156,7 @@
"return the frame corner"
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
^ frame corner
!
@@ -165,7 +165,7 @@
"return the extent of the frame"
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
^ frame extent
!
@@ -174,7 +174,7 @@
"object must return a frame boundary rectangle"
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
^ frame
!
@@ -183,7 +183,7 @@
"return the height of the frame"
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
^ frame height
!
@@ -200,7 +200,7 @@
"return the frame origin"
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
^ frame origin
!
@@ -225,7 +225,7 @@
"return the width of the frame"
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
^ frame width
!
@@ -418,7 +418,7 @@
"/ for backward compatibility, fall back to Display box computation
- ^ self computeBoundingBox
+ self computeBoundingBox
!
initialize
@@ -453,7 +453,7 @@
|org left right top bott px py d2|
frame isNil ifTrue:[
- frame := self computeBoundingBox
+ self computeBoundingBox
].
(delta == 0) ifTrue:[
^ frame containsPoint:aPoint
@@ -553,5 +553,5 @@
!DisplayObject class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/DisplayObject.st,v 1.28 2003-01-21 15:50:42 mb Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/DisplayObject.st,v 1.29 2003-01-30 08:57:35 mb Exp $'
! !