--- a/LayoutOrigin.st Fri Apr 19 18:07:39 1996 +0200
+++ b/LayoutOrigin.st Mon Apr 22 13:02:23 1996 +0200
@@ -11,10 +11,10 @@
"
Layout subclass:#LayoutOrigin
- instanceVariableNames:'leftFraction topFraction leftOffset topOffset'
- classVariableNames:''
- poolDictionaries:''
- category:'Graphics-Geometry'
+ instanceVariableNames:'leftFraction topFraction leftOffset topOffset'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Graphics-Geometry'
!
!LayoutOrigin class methodsFor:'documentation'!
@@ -237,25 +237,27 @@
!
literalArrayEncoding
- "encode myself as an array.
+ "encode myself as an array, from which a copy of the receiver
+ can be reconstructed with #decodeAsLiteralArray.
The encoding is:
- (#LayoutOrigin orgOffsX relOrgX orgOffsY relOrgY)
+ (#LayoutOrigin orgOffsX relOrgX orgOffsY relOrgY)
"
^ Array
- with:self class name asSymbol
- with:leftOffset
- with:leftFraction
- with:topOffset
- with:topFraction
+ with:self class name asSymbol
+ with:leftOffset
+ with:leftFraction
+ with:topOffset
+ with:topFraction
"
LayoutOrigin new fromLiteralArrayEncoding:#(#LayoutOrigin 70 0 2 0)
(LayoutOrigin new leftOffset:10; leftFraction:0.2;
- topOffset:20; topFraction:0.4) literalArrayEncoding
+ topOffset:20; topFraction:0.4) literalArrayEncoding
"
"Modified: 1.9.1995 / 02:43:48 / claus"
+ "Modified: 22.4.1996 / 13:00:21 / cg"
! !
!LayoutOrigin methodsFor:'initialization'!
@@ -317,5 +319,5 @@
!LayoutOrigin class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.9 1995-11-23 17:42:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.10 1996-04-22 11:02:23 cg Exp $'
! !