--- a/GraphicsContext.st	Thu May 17 16:51:00 2001 +0200
+++ b/GraphicsContext.st	Thu May 17 17:04:46 2001 +0200
@@ -713,6 +713,8 @@
      If there is currently no active clip, return the underlying
      displaySurfaces (i.e. views) bounds. Added for ST-80 compatibility."
 
+    <resource:#obsolete>
+
     self obsoleteMethodWarning:'use #clippingBounds'.
     ^ self clippingBounds.
 
@@ -722,6 +724,8 @@
 clipRect:aRectangle
     "set the drawing clip-rectangle"
 
+    <resource:#obsolete>
+
     self obsoleteMethodWarning:'use #clippingRectangle:'.
     ^ self clippingRectangle:aRectangle
 
@@ -1306,6 +1310,8 @@
 displayArcX:x y:y w:w h:h from:startAngle angle:angle
     "draw an arc; apply transformation if nonNil"
 
+    <resource:#obsolete>
+
     self obsoleteMethodWarning:'use #displayArcX:y:width:height:from:angle:'.
     self displayArcX:x y:y width:w height:h from:startAngle angle:angle
 
@@ -1870,6 +1876,8 @@
 fillArcX:x y:y w:w h:h from:startAngle angle:angle
     "draw a filled arc; apply transformation if nonNil"
 
+    <resource:#obsolete>
+
     self obsoleteMethodWarning:'use #fillArcX:y:width:height:from:angle:'.
     self fillArcX:x y:y width:w height:h from:startAngle angle:angle
 
@@ -2197,6 +2205,6 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.89 2000-10-25 13:05:00 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.90 2001-05-17 15:04:46 stefan Exp $'
 ! !
 GraphicsContext initialize!