--- a/LayoutFrame.st	Thu Sep 14 16:49:19 2006 +0200
+++ b/LayoutFrame.st	Fri Sep 15 16:30:57 2006 +0200
@@ -131,6 +131,16 @@
 
 !LayoutFrame class methodsFor:'instance creation'!
 
+inset:pixels
+    "create a new layoutFrame which insets the child by some pixels"
+
+    ^ self
+        leftFraction:0 offset:pixels
+        rightFraction:1 offset:pixels negated
+        topFraction:0 offset:pixels 
+        bottomFraction:1 offset:pixels negated 
+!
+
 leftFraction:lF offset:lO rightFraction:rF offset:rO topFraction:tF offset:tO bottomFraction:bF offset:bO
     "create a new layoutFrame"
 
@@ -492,5 +502,5 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.31 2006-03-08 15:48:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.32 2006-09-15 14:30:57 fm Exp $'
 ! !