--- 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!