--- a/LayoutFrame.st	Fri Feb 14 01:48:12 1997 +0100
+++ b/LayoutFrame.st	Fri Feb 14 01:50:01 1997 +0100
@@ -127,6 +127,21 @@
 "
 ! !
 
+!LayoutFrame class methodsFor:'instance creation'!
+
+leftFraction:lF offset:lO rightFraction:rF offset:rO topFraction:tF offset:tO bottomFraction:bF offset:bO
+    "create a new layoutFrame"
+
+    ^ self new
+        leftFraction:lF offset:lO 
+        rightFraction:rF offset:rO 
+        topFraction:tF offset:tO 
+        bottomFraction:bF offset:bO
+
+
+
+! !
+
 !LayoutFrame methodsFor:'accessing'!
 
 bottomFraction
@@ -386,5 +401,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.17 1997-02-14 00:48:12 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.18 1997-02-14 00:50:01 ca Exp $'
 ! !

--- a/LayoutFrm.st	Fri Feb 14 01:48:12 1997 +0100
+++ b/LayoutFrm.st	Fri Feb 14 01:50:01 1997 +0100
@@ -127,6 +127,21 @@
 "
 ! !
 
+!LayoutFrame class methodsFor:'instance creation'!
+
+leftFraction:lF offset:lO rightFraction:rF offset:rO topFraction:tF offset:tO bottomFraction:bF offset:bO
+    "create a new layoutFrame"
+
+    ^ self new
+        leftFraction:lF offset:lO 
+        rightFraction:rF offset:rO 
+        topFraction:tF offset:tO 
+        bottomFraction:bF offset:bO
+
+
+
+! !
+
 !LayoutFrame methodsFor:'accessing'!
 
 bottomFraction
@@ -386,5 +401,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.17 1997-02-14 00:48:12 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.18 1997-02-14 00:50:01 ca Exp $'
 ! !