--- a/ArrowedSpline.st	Thu Jan 30 15:38:03 1997 +0100
+++ b/ArrowedSpline.st	Wed Feb 12 13:23:57 1997 +0100
@@ -323,7 +323,15 @@
 
 !ArrowedSpline methodsFor:'queries'!
 
-bounds
+canBeFilled
+    "return true, if the receiver can be drawn as a filled geometric.
+     Always true here. Notice, that only the arrowHeads are filled."
+
+    ^ true
+
+!
+
+computeBounds
     "return the smallest enclosing rectangle"
 
     |minX maxX minY maxY|
@@ -343,23 +351,12 @@
     ].    
     ^ Rectangle left:minX right:maxX top:minY bottom:maxY
 
-
-    "Created: 26.5.1996 / 13:06:48 / cg"
     "Modified: 26.5.1996 / 13:08:48 / cg"
-
-
-!
-
-canBeFilled
-    "return true, if the receiver can be drawn as a filled geometric.
-     Always true here. Notice, that only the arrowHeads are filled."
-
-    ^ true
-
+    "Created: 12.2.1997 / 11:42:41 / cg"
 ! !
 
 !ArrowedSpline class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/ArrowedSpline.st,v 1.7 1996-09-20 07:34:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/ArrowedSpline.st,v 1.8 1997-02-12 12:23:57 cg Exp $'
 ! !