--- a/GraphicsContext.st Thu Apr 14 11:11:54 2005 +0200
+++ b/GraphicsContext.st Mon Apr 18 17:59:13 2005 +0200
@@ -547,6 +547,12 @@
^ self displayPolygon:aPolygon
!
+displayRectangularBorder:aRectangle
+ "draw a rectangle - ST-80 compatibility"
+
+ self displayRectangle:aRectangle
+!
+
displayRectangularBorder:aRectangle at:aPoint
"draw a rectangle - ST-80 compatibility"
@@ -2303,7 +2309,7 @@
!GraphicsContext class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.106 2005-04-12 15:15:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.107 2005-04-18 15:59:13 cg Exp $'
! !
GraphicsContext initialize!