--- a/LayoutFrm.st	Sun May 26 13:28:16 1996 +0200
+++ b/LayoutFrm.st	Sun May 26 18:50:39 1996 +0200
@@ -148,6 +148,14 @@
     bottomOffset := o
 !
 
+bottomInset:pixels
+    "set bottomOffset for an inset at the bottom"
+
+    bottomOffset := pixels negated.
+
+    "Created: 26.5.1996 / 17:38:30 / cg"
+!
+
 bottomOffset
     "return bottomOffset"
 
@@ -160,6 +168,26 @@
     bottomOffset := something.
 !
 
+horizontalInset:aNumber
+    "setup the offsets for insetting horizontally the frame aNumber pixels
+     at all sides"
+
+    leftOffset := aNumber.
+    rightOffset := aNumber negated.
+
+    "Created: 26.5.1996 / 17:39:35 / cg"
+!
+
+inset:aNumber
+    "setup the offsets for insetting the frame aNumber pixels
+     at all sides"
+
+    topOffset := leftOffset := aNumber.
+    rightOffset := bottomOffset := aNumber negated.
+
+    "Created: 26.5.1996 / 17:36:49 / cg"
+!
+
 rightFraction
     "return rightFraction"
 
@@ -179,6 +207,14 @@
     rightOffset := o
 !
 
+rightInset:pixels
+    "set rightOffset for an inset at the right"
+
+    rightOffset := pixels negated.
+
+    "Created: 26.5.1996 / 17:38:38 / cg"
+!
+
 rightOffset
     "return rightOffset"
 
@@ -189,6 +225,16 @@
     "set rightOffset"
 
     rightOffset := something.
+!
+
+verticalInset:aNumber
+    "setup the offsets for insetting vertically the frame aNumber pixels
+     at all sides"
+
+    topOffset := aNumber.
+    bottomOffset := aNumber negated.
+
+    "Created: 26.5.1996 / 17:39:50 / cg"
 ! !
 
 !LayoutFrame methodsFor:'converting'!
@@ -318,5 +364,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.14 1996-05-08 19:06:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutFrm.st,v 1.15 1996-05-26 16:50:30 cg Exp $'
 ! !