commentary
authorClaus Gittinger <cg@exept.de>
Mon, 22 Apr 1996 13:02:23 +0200
changeset 191 cb2815b77100
parent 190 f8de925054bf
child 192 947cc10f86dc
commentary
AlignOrg.st
AlignmentOrigin.st
LayoutFrame.st
LayoutFrm.st
LayoutOrg.st
LayoutOrigin.st
--- a/AlignOrg.st	Fri Apr 19 18:07:39 1996 +0200
+++ b/AlignOrg.st	Mon Apr 22 13:02:23 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 LayoutOrigin subclass:#AlignmentOrigin
-	 instanceVariableNames:'leftAlignmentFraction topAlignmentFraction'
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'Graphics-Geometry'
+	instanceVariableNames:'leftAlignmentFraction topAlignmentFraction'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Graphics-Geometry'
 !
 
 !AlignmentOrigin class methodsFor:'documentation'!
@@ -157,16 +157,18 @@
 !
 
 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: 
-	(#AlignmentOrigin orgOffsX relOrgX orgOffsY relOrgY leftAlignFract topAlignFract)"
+        (#AlignmentOrigin orgOffsX relOrgX orgOffsY relOrgY leftAlignFract topAlignFract)"
 
     ^ super literalArrayEncoding
       , (Array
-	    with:leftAlignmentFraction
-	    with:topAlignmentFraction)
+            with:leftAlignmentFraction
+            with:topAlignmentFraction)
 
     "Modified: 1.9.1995 / 02:43:35 / claus"
+    "Modified: 22.4.1996 / 12:59:56 / cg"
 ! !
 
 !AlignmentOrigin methodsFor:'initialization'!
@@ -234,5 +236,5 @@
 !AlignmentOrigin class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/AlignOrg.st,v 1.8 1995-11-23 17:42:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/AlignOrg.st,v 1.9 1996-04-22 11:01:24 cg Exp $'
 ! !
--- a/AlignmentOrigin.st	Fri Apr 19 18:07:39 1996 +0200
+++ b/AlignmentOrigin.st	Mon Apr 22 13:02:23 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 LayoutOrigin subclass:#AlignmentOrigin
-	 instanceVariableNames:'leftAlignmentFraction topAlignmentFraction'
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'Graphics-Geometry'
+	instanceVariableNames:'leftAlignmentFraction topAlignmentFraction'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Graphics-Geometry'
 !
 
 !AlignmentOrigin class methodsFor:'documentation'!
@@ -157,16 +157,18 @@
 !
 
 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: 
-	(#AlignmentOrigin orgOffsX relOrgX orgOffsY relOrgY leftAlignFract topAlignFract)"
+        (#AlignmentOrigin orgOffsX relOrgX orgOffsY relOrgY leftAlignFract topAlignFract)"
 
     ^ super literalArrayEncoding
       , (Array
-	    with:leftAlignmentFraction
-	    with:topAlignmentFraction)
+            with:leftAlignmentFraction
+            with:topAlignmentFraction)
 
     "Modified: 1.9.1995 / 02:43:35 / claus"
+    "Modified: 22.4.1996 / 12:59:56 / cg"
 ! !
 
 !AlignmentOrigin methodsFor:'initialization'!
@@ -234,5 +236,5 @@
 !AlignmentOrigin class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/AlignmentOrigin.st,v 1.8 1995-11-23 17:42:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/AlignmentOrigin.st,v 1.9 1996-04-22 11:01:24 cg Exp $'
 ! !
--- a/LayoutFrame.st	Fri Apr 19 18:07:39 1996 +0200
+++ b/LayoutFrame.st	Mon Apr 22 13:02:23 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 LayoutOrigin subclass:#LayoutFrame
-	 instanceVariableNames:'rightFraction bottomFraction rightOffset bottomOffset'
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'Graphics-Geometry'
+	instanceVariableNames:'rightFraction bottomFraction rightOffset bottomOffset'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Graphics-Geometry'
 !
 
 !LayoutFrame class methodsFor:'documentation'!
@@ -193,18 +193,20 @@
 !
 
 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 cornOffsX relCornX cornOffsY relCornY)"
+        (#LayoutOrigin orgOffsX relOrgX orgOffsY relOrgY cornOffsX relCornX cornOffsY relCornY)"
 
     ^ super literalArrayEncoding
       , (Array
-	    with:rightOffset
-	    with:rightFraction
-	    with:bottomOffset
-	    with:bottomFraction)
+            with:rightOffset
+            with:rightFraction
+            with:bottomOffset
+            with:bottomFraction)
 
     "Modified: 1.9.1995 / 02:43:35 / claus"
+    "Modified: 22.4.1996 / 13:00:17 / cg"
 ! !
 
 !LayoutFrame methodsFor:'initialization'!
@@ -289,5 +291,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.10 1995-11-23 17:42:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.11 1996-04-22 11:02:14 cg Exp $'
 ! !
--- a/LayoutFrm.st	Fri Apr 19 18:07:39 1996 +0200
+++ b/LayoutFrm.st	Mon Apr 22 13:02:23 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 LayoutOrigin subclass:#LayoutFrame
-	 instanceVariableNames:'rightFraction bottomFraction rightOffset bottomOffset'
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'Graphics-Geometry'
+	instanceVariableNames:'rightFraction bottomFraction rightOffset bottomOffset'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Graphics-Geometry'
 !
 
 !LayoutFrame class methodsFor:'documentation'!
@@ -193,18 +193,20 @@
 !
 
 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 cornOffsX relCornX cornOffsY relCornY)"
+        (#LayoutOrigin orgOffsX relOrgX orgOffsY relOrgY cornOffsX relCornX cornOffsY relCornY)"
 
     ^ super literalArrayEncoding
       , (Array
-	    with:rightOffset
-	    with:rightFraction
-	    with:bottomOffset
-	    with:bottomFraction)
+            with:rightOffset
+            with:rightFraction
+            with:bottomOffset
+            with:bottomFraction)
 
     "Modified: 1.9.1995 / 02:43:35 / claus"
+    "Modified: 22.4.1996 / 13:00:17 / cg"
 ! !
 
 !LayoutFrame methodsFor:'initialization'!
@@ -289,5 +291,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.10 1995-11-23 17:42:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.11 1996-04-22 11:02:14 cg Exp $'
 ! !
--- a/LayoutOrg.st	Fri Apr 19 18:07:39 1996 +0200
+++ b/LayoutOrg.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/Attic/LayoutOrg.st,v 1.9 1995-11-23 17:42:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutOrg.st,v 1.10 1996-04-22 11:02:23 cg Exp $'
 ! !
--- 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 $'
 ! !