--- a/LayoutFrame.st	Fri Feb 14 01:42:03 1997 +0100
+++ b/LayoutFrame.st	Fri Feb 14 01:48:12 1997 +0100
@@ -188,6 +188,20 @@
     "Created: 26.5.1996 / 17:36:49 / cg"
 !
 
+leftFraction:lF offset:lO rightFraction:rF offset:rO topFraction:tF offset:tO bottomFraction:bF offset:bO
+    "set all fields"
+
+    leftFraction := lF.
+    rightFraction := rF.
+    topFraction := tF.
+    bottomFraction := bF.
+    leftOffset := lO.
+    rightOffset := rO.
+    topOffset := tO.
+    bottomOffset := bO.
+
+!
+
 rightFraction
     "return rightFraction"
 
@@ -372,5 +386,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.16 1997-02-11 23:07:30 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.17 1997-02-14 00:48:12 ca Exp $'
 ! !

--- a/LayoutFrm.st	Fri Feb 14 01:42:03 1997 +0100
+++ b/LayoutFrm.st	Fri Feb 14 01:48:12 1997 +0100
@@ -188,6 +188,20 @@
     "Created: 26.5.1996 / 17:36:49 / cg"
 !
 
+leftFraction:lF offset:lO rightFraction:rF offset:rO topFraction:tF offset:tO bottomFraction:bF offset:bO
+    "set all fields"
+
+    leftFraction := lF.
+    rightFraction := rF.
+    topFraction := tF.
+    bottomFraction := bF.
+    leftOffset := lO.
+    rightOffset := rO.
+    topOffset := tO.
+    bottomOffset := bO.
+
+!
+
 rightFraction
     "return rightFraction"
 
@@ -372,5 +386,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.16 1997-02-11 23:07:30 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.17 1997-02-14 00:48:12 ca Exp $'
 ! !