--- a/Label.st	Thu Apr 29 10:00:47 1999 +0200
+++ b/Label.st	Thu Apr 29 22:06:16 1999 +0200
@@ -1564,14 +1564,18 @@
 !
 
 drawWin95FocusFrame
+    |m1 m2|
+
+    m1 := margin + 1.
+    m2 := margin + margin + 2.
     self
-        displayDottedRectangleX:(margin+1)
-        y:(margin+1)
-        width:(width - margin - margin - 2)
-        height:(height-margin-margin-2).
+        displayDottedRectangleX:m1
+        y:m1
+        width:(width - m2)
+        height:(height - m2).
 
     "Created: / 17.9.1998 / 14:16:46 / cg"
-    "Modified: / 18.9.1998 / 16:56:24 / cg"
+    "Modified: / 29.4.1999 / 21:49:22 / cg"
 !
 
 drawWith:fg and:bg
@@ -1719,5 +1723,5 @@
 !Label class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.100 1999-04-24 16:05:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.101 1999-04-29 20:06:16 cg Exp $'
 ! !