equal
deleted
inserted
replaced
957 |
957 |
958 insetOriginBy:originDelta cornerBy:cornerDelta |
958 insetOriginBy:originDelta cornerBy:cornerDelta |
959 "return a new rectangle which is inset by originDelta |
959 "return a new rectangle which is inset by originDelta |
960 and cornerDelta; both may be instances of Point or Number" |
960 and cornerDelta; both may be instances of Point or Number" |
961 |
961 |
962 |amountPoint deltaLeft deltaTop deltaWidth deltaHeight| |
|
963 |
|
964 ^ Rectangle |
962 ^ Rectangle |
965 origin:(left @ top) + originDelta asPoint |
963 origin:(left @ top) + originDelta asPoint |
966 corner:(self corner - cornerDelta asPoint) |
964 corner:(self corner - cornerDelta asPoint) |
967 " |
965 " |
968 |r| |
966 |r| |
1147 ! ! |
1145 ! ! |
1148 |
1146 |
1149 !Rectangle class methodsFor:'documentation'! |
1147 !Rectangle class methodsFor:'documentation'! |
1150 |
1148 |
1151 version |
1149 version |
1152 ^ '$Header: /cvs/stx/stx/libbasic/Rectangle.st,v 1.30 1996-01-05 12:33:15 cg Exp $' |
1150 ^ '$Header: /cvs/stx/stx/libbasic/Rectangle.st,v 1.31 1996-01-15 22:55:37 cg Exp $' |
1153 ! ! |
1151 ! ! |