StrokingWrapper.st
changeset 295 e1a91bbfbef3
parent 280 39e270e5aa30
child 365 47e0d48fd769
--- a/StrokingWrapper.st	Wed Jun 05 20:27:36 1996 +0200
+++ b/StrokingWrapper.st	Wed Jun 05 20:36:50 1996 +0200
@@ -165,10 +165,10 @@
 bounds
     "return the boundary rectangle - here, must take care of the lineWidth"
 
-    ^ component bounds insetBy:(lineWidth // 2 + 1) negated
+    ^ (component bounds insetBy:(lineWidth // 2 + 1) negated) rounded
 
     "Created: 8.5.1996 / 23:22:43 / cg"
-    "Modified: 26.5.1996 / 13:03:50 / cg"
+    "Modified: 5.6.1996 / 20:30:39 / cg"
 !
 
 capStyle
@@ -246,10 +246,10 @@
 preferredBounds
     "return the components bounds as preferredBounds"
 
-    ^ self bounds
+    ^ (component bounds insetBy:(lineWidth / 2 + 1) negated) rounded
 
     "Created: 8.5.1996 / 23:23:00 / cg"
-    "Modified: 9.5.1996 / 00:09:31 / cg"
+    "Modified: 5.6.1996 / 20:32:36 / cg"
 ! !
 
 !StrokingWrapper methodsFor:'displaying'!
@@ -300,5 +300,5 @@
 !StrokingWrapper class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/StrokingWrapper.st,v 1.11 1996-05-28 22:52:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/StrokingWrapper.st,v 1.12 1996-06-05 18:36:43 cg Exp $'
 ! !