--- a/GraphicsContext.st	Tue Mar 30 15:59:27 2004 +0200
+++ b/GraphicsContext.st	Tue Mar 30 20:50:05 2004 +0200
@@ -1806,7 +1806,10 @@
     ] ifFalse:[
         angle < 0 ifTrue:[
             angle := angle - (((angle // 360)) * 360).
-            angle := angle + 360
+            angle := angle + 360.
+            angle >= 360 ifTrue:[
+                angle := angle - (((angle // 360)) * 360)
+            ]
         ].
     ].
 
@@ -1870,7 +1873,6 @@
 
     "/ compute final position of rotated form
     "/ adjust position for baseline.
-
     angle = 90 ifTrue:[
         xN := x - descent. 
         yN := y.
@@ -2280,7 +2282,7 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.102 2004-03-15 22:38:10 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.103 2004-03-30 18:50:05 cg Exp $'
 ! !
 
 GraphicsContext initialize!